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CPU AND PPU INSTRUCTION INDEX 


CPU INSTRUCTIONS 


CPU INSTRUCTIONS (cont’d) 


Mnemonic 

Code 


Operation Page 
Code (octal) Number 


Mnemonic 

Code 


Operation Page 
Code (octal) Number 


AXi 

+ jk 

21ijk 

8-30 

RXi 

Xj*Xk 

4 lijk 

AXi 

Bj,Xk 

23ijk 

8-32 

RXi 

Xj/Xk 

45 ijk 

BXi 

Xj 

lOijj 

.8-25 

RXj 

Xk 

014jk 

BXi 

Xj*Xk 

11 ijk 

8-26 

SAi 

Aj±K 

SOijK 

BXi 

Xj+Xk 

i2ijk 

8-26 

SAi 

Bj±K 

51ijK 

BXi 

Xj-Xk 

d 3ijk 

8-27 

SAi 

Xj + K 

52ijK 

BXi 

-Xk 
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8-27 

SAi 
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BXi 

-Xk*Xj.» 

15ijk 
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SAi 

Aj+Bk 
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BXi 
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55 ijk 

BXi 
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17ijk 

8-29 

SAi 
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56ijk 

CX-K 

Xk 

47ikk 

8-44 

SAi 

Bj-Bk 

57ijk 

DF >*■ 

Xj,K 

036jK 

8-21 

SBi 

Aj+K 

60ijK 

DXi 

Xj+Xk 

32ijk 

8-37 

SBi 

Bj±K 

61ijK 

DXi 

Xj-Xk 

33ijk 

8,37 

SBi 

Xj±K 

62ijK 

DXi 

Xj*Xk 

42ijk 

8-40 

SBi 

Xj+Bk 

63ijk 

EQ 

Bi,Bj,K 

04ijK 

8-23 

SBi 

Aj+Bk 

64 ijk 

ES 

K 

00000 

8-11 

SBi 

Aj-Bk 

65 ijk 

FXi 

Xj+Xk 

30ijk 

8-36 

SBi 

Bj+Bk 

66ijk 

FXi 

Xj-Xk 

3 lijk 

8-36 

SBi 

Bj-Bk 

67 ijk 

FXi 

Xi*Xk 

40ijk 

8-39 

SXi 

Aj+K 

70ijK 

FXi 

Xj/Xk 

44ijk 

8-42 

SXi 

Bj±K 

7 lijK 

GE 

Bi,Bj,K 

06ijK 

8-23 

SXi 

Xj + K 

72ijK 

GE 

Bi,K 

06i0K 

8-23 

SXi 

Xj+Bk 

73ijk 

GT 

Bj,Bi,K 

07ijK 

8-23 

SXi 

Aj+Bk 

74ijk 

GT 

Bj,K 

070jK 

8-23 

SXi 

Aj-Bk 

75 ijk 

IBj 

Bk 

016jk 

8-19 

SXi 

Bj+Bk 

76ijk 

ID 

Xj,K 

037jK 

8-21 

SXi 

Bj-Bk 

7 7 ijk 

IR X 

Xj,K 

034jk 

8-21 

TBj 


016j0 

IXi' 

Xj+Xk 

36ijk 

8-38 

UXi 

Bj,Xk 

26ijk 

IXi 

Xj-Xk 

37ijk 

8-38 

WE 

Bj+K 

012jK 

IXi 

Xj*Xk 

42ijk 

8-40 

WL 

Bj±K 

012jK 

JP 

Bi±K 

02iiK 

8-20 

WXj 

Xk 

015jk 

LE 

Bj,Bi,K 

06ijK 

8-23 

XJ 

Bj + K 

013jK 

LT 

Bi,Bj,K 

07ijK 

8-23 

ZR 

Xj,K 

030jK 

LXi 

±jk 

20ijk 

8-30 

ZR 

Bi,K 

04i0K 

LXi 

Bj,Xk 

22ijk 

8-31 

ZXi 

Bi,Xk 

25 ijk 

MI 

Xj,K 

033jK 

8-21 


CMU INSTRUCTIONS 

MI 

Bi,K 

07i0K 

8-23 

CC 


MJ 


01300 

8-15 

cu 

V)c a ,c a Xb,Cb 

MJ 

Bj±K 

013jK 

8-15 

DM 

^»kg,c S jk^,C(j 


MXi 

+jk 

43ijk 

8-41 

IM 

Bj±K 

(464jK) 

NE 

Bi,Bj.K 

05ijK 

8-23 

MD 

k,k S) c s 4cd>cd 


PPU INSTRUCTIONS (cont’d) 


Operation Page 
Code (octal) Number 


m,d 

6 m 

9-18 

m,d 

67dm 

9-17 

m,d 

65 dm 

9-18 

d 

270d 

9-11 

d 

7700 

9-22 

d 

260d 

9-11 

d 

260d 

9-10 

d 

76d 

9-21 

m,d 

60dm 

9-18 

m,d 

66dm 

9-17 

m,d 

77dm 

9-21 

m,d 

64dm 

9-18 

m,d 

71dm 

9-19 

d 

70d 

9-19 

m,d 

65dm 

9-17 

m,d 

62dm 

9-18 

d 

15d 

9-7 

c 

20dm 

9-8 

d 

30d 

9-12 

d 

40d 

9-13 

m,d 

50dm 

9-14 


Name 

PPU INSTRUCTIONS 
Operation 
Code (octal) 

Page 

Number 

KAI 

RAM 

RFN 

RJM 

a 

m,d 

d 

m,d 

uou 

55dm 

74d 

02dm 

y-Lj 

9-14 

9-20 

9-5 


ACN 

d 

74d 

9-21 

RPN 

d 

270d 

9-11 

W 

ADC 

c 

21dm 

9-8 

SBD 

d 

32d 

9-12 


ADD 

d 

31d 

9-12 

SBI 

d 

42d 

9-13 


ADI 

d 

41d 

9-13 

SBM 

m,d 

52dm 

9-14 


ADM 

m,d 

51dm 

9-14 

SBN 

d 

17d 

9-7 

\_y 

ADN 

d 

16d 

9-7 

SCN 

d 

13d 

9-7 

AJM 

m,d 

64dm 

9-17 

SHN 

r 

lOr 

9-7 


AOD 

d 

36d 

9-12 

SOD 

d 

37d 

9-12 


AO I 

d 

46d 

9-13 

SOI 

d 

47 d 

9-13 

X ' 

AOM 

m,d 

56dm 

9-14 

SOM 

m,d 

57dm 

9-14 

; W 

CRD 

d 

60d 

9-15 

STD 

d 

34d 

9-12 


CRM 

m,d 

61dm 

9-15 

STI 

d 

44d 

9-13 


CWD 

d 

62d 

9-15 

STM 

m,d 

54dm 

9-14 

'■ r , 

CWM 

m,d 

63dm 

9-15 

UJN 

r 

03d 

9-5 


DCN 

d 

• 75 d 

9-21 

ZJN 

r 

04d 

9-5 


There is also an integer divide macro (IXi Xj/Xk). 
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PREFACE 


The Control Data COMPASS Version 3.6 Assembler provides the user with a versatile, extensive language 
for generation of object code to be loaded and executed on the central processor unit (CPU) or a peripheral 
processor unit (PPU). The assembler executes on the following computer systems and operating systems: 

• NOS 1 for the CONTROL DATA® CYBER 170 Series; CYBER 70 Models 71, 72, 73, 74; and 6000 
Series Computer Systems 

• NOS/BE 1 for the CDC® CYBER 170 Series; CYBER 70 Models 71, 72, 73, 74; and 6000 Series 
Computer Systems 

• SCOPE 2 for the CONTROL DATA CYBER 170 Model 176, CYBER 70 Model 76, and 7600 Computer 
Systems 

The CDC CYBER 170 Models 720 and 730 have unified processors and use the instructions noted in this , 
publication for computer models with a Compare/Move Unit (CMU) such as the CYBER 170 Model 172. 

The CDC CYBER 170 Models 740, 750, and 760 have functional units and use instructions noted in this 
publication for computer models with functional units such as the CYBER 170 Model 175. 

This publication is not intended as a replacement for the related computer system reference manuals, 
which contain detailed information on machine instructions. Information in the related computer system 
reference manuals takes precedence over information in this publication should discrepancies arise between 
the publications. 

The reader is assumed to be familiar with a Control Data computer and operating system, and with 
assemblers in general. 


NOTE 

Continued use of COMPASS in creating application programs should be avoided 
when possible. COMPASS and other machine-dependent languages can com¬ 
plicate migration to future hardware and software systems. Program mobility 
will be restricted by continued use of COMPASS for stand-alone programs, 

COMPASS subroutines embedded in programs using higher-level languages, and 
user-written COMPASS owncode routines in CDC standard products. 

Extended memory for the CDC CYBER 170 Models 171, 172, 173, 174, 175, 720, 730, 740, 750, and 760 is 
extended core storage (ECS). Extended memory for the CDC CYBER 170 Model 176 is large central 
memory (LCM) or large central memory extended (LCME). ECS, LCM, and LCME are functionally equi¬ 
valent, except as follows: 

• LCM and LCME cannot link mainframes and do not have a distributive data path (DDP) capability. 

• LCM and LCME transfer errors initiate an error exit, not a half exit, as noted in section 8.4.4. 

The CYBER 170 Model 176 supports direct LCM and LCME transfer instructions. These are described in 
section 8.4.8. 

In this manual, numbers occurring in text are decimal unless otherwise noted. Lowercase letters in formats 
depict variables. The examples assume that assembler numeric mode is decimal and that character mode is 
display code unless otherwise noted. In examples, statements generated by the assembler as a result of a 
call or a substitution are shown in shaded print. 
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General explanations of COMPASS concepts have been limited to the initial pages of each chapter or 
section, whenever possible. Subsequent material has been presented in a concise manner to aid in rapid 
access to reference information. In keeping with this concept, instruction indexes have been included 
inside the front and back covers. 

Additional information essential to programming in the COMPASS environment can be found in the listed 
publications. The first group consists of software-related publications; the second group consists of 
hardware-related publications. Publications are listed by ASCII collating sequence within each group. 

The applications programmer will need the CYBER Record Manager Basic Access Methods and Advanced 
Access Methods manuals for information about the macros needed to define, access, and manipulate files. 
Information necessary to create and manipulate program structures can be found in the appropriate Loader 
reference manual (CYBER Loader for the NOS and NOS/BE operating systems, and the SCOPE 2 Loader 
for the SCOPE 2 operating system). 

In addition to the above, the systems programmer will need the appropriate operating system manual to 
obtain information about system macros. Volume 2 of the NOS reference manual is indispensible for the 
COMPASS programmer in the NOS environment. Further, more detailed descriptions of COMPASS 
instructions can be found in the appropriate hardware reference manual. 

A Control Data abstracts manual is a pocket-sized booklet containing brief descriptions of the contents and 
intended audience of all manuals for a CDC operating system and its product set. The abstracts manual 
can be useful in determining which manuals are of greatest interest to a particular user. The Software 
Publications Release History serves as a guide to the revision level of software documentation which 
corresponds to the Programming System Report (PSR) level of installed site software. 


Software-Related Publications 


Publication 

7000 Record Manager Reference Manual 
COMPASS Version 3 Instant 

CYBER Interactive Debug Version 1 Reference Manual 

CYBER Loader Version 1 Reference Manual 

CYBER Record Manager Advanced Access Methods 
Version 2 Reference Manual 

CYBER Record Manager Basic Access Methods 
Version 1.5 Reference Manual 

Modify Reference Manual 

NOS 1 Reference Manual, Volume 1 

NOS 1 Reference Manual, Volume 2 

NOS Version 1 Manual Abstracts 

NOS/BE 1 Reference Manual 

NOS/BE Version 1 Manual Abstracts 


Publication 

Number 

60454690 

60492800 

60481400 

60429800 

60499300 

60495700 

60450100 

60435400 

60445300 

84000420 

60493800 

84000470 


• vi 
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SCOPE 2 Loader Version 2 Reference Manual 

60454780 

SCOPE 2 Reference Manual 

60342600 

Software Publications Release History 

60481000 

Update 1 Reference Manual 

60449900 

Hardware-Related Publications 


Publication 

Publication 

Number 

CDC CYBER 170 Computer Systems Models 171 through 175 
(levels A, B, C) Model 176 (level A) 

60420000 

CDC CYBER 170 Computer Systems Models 720, 730, 740, 

750, 760 Model 176 (level B) 

60456100 

CDC CYBER 70 Computer Systems-7030 Extended 

Core Storage Reference Manual 

60347100 

CDC CYBER 70 Model 71 Systems Description and 

Programming Information Reference Manual, Volume 1 

60453300 

CDC CYBER 70 Model 72 Systems Description and 

Programming Information Reference Manual, Volume 1 

60347000 

CDC CYBER 70 Model 73 Systems Description and 

Programming Information Reference Manual, Volume 1 

9 

60347200 

CDC CYBER 70 Model 74 Systems Description and 

Programming Information Reference Manual, Volume 1 

60347400 

CDC CYBER 70 Model 76 Reference Manual 

60367200 

CDC CYBER 70 Models 72, 73, and 74 and 6000 Series 

Computer Systems I/O Specifications Reference Manual 

60352500 

CDC CYBER 70 Models 72, 73, and 74 Instruction 

Descriptions Reference Manual, Volume 2 

60347300 


CDC manuals can be ordered from Control Data Corporation, Literature and Distribution 
Services, 308 North Dale Street, St. Paul, Minnesota 55103. 


This product is intended for use only as described 
in this document. Control Data cannot be respon¬ 
sible for the proper functioning of undescribed 
features or parameters. 
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INTRODUCTION 


1 


This manual describes the features of the COMPASS Version 3 assembly language processor and the 
principles, methods, rules, and techniques of coding a COMPASS program. 

The user is assumed to be familiar with a Control Data computer and operating system, and is assumed to 
be familiar with assemblers in general. 

Readers with no previous experience with the COMPASS assembler are encouraged to direct their initial 
attention to the following sections of the manual: 


Chapter 1 

Introduction 

Chapter 2 

Language Structure 

Chapter 3 

Program Structure, sections 3.1 through 3.3 

Chapter 4 

Pseudo Instructions, sections 4.1 and 4.2 

Chapter 8 or 9 

CPU or PPU Symbolic Machine Instructions, the chapter depending upon the 
machine language the user requires 

Chapter 10 

Program Execution 

Appendix D 

Hints on Using COMPASS (example program) 


COMPASS, like other assemblers, is machine- and operating system-dependent. The user, therefore, should 
be aware of restrictions imposed on COMPASS by the programming environment. Specifically, the user 
should note: 

• Differences between CPU and PPU program environments 

• Features of COMPASS not supported by a particular operating system 

Machine and operating system limitations are outlined in the preface of this manual. The applicability of 
instruction sets is shown in the instruction indexes (inside front and back covers), and is addressed as 
necessary throughout the manual. 

A COMPASS program consists of one or more subprograms. From source language subprograms, the 
assembler generates binary output acceptable for loading and execution. The programmer can divide a 
subprogram, whether it is assembled as absolute or relocatable, into areas called blocks. Blocks are 
assembled independently. Thus, they can be loaded and executed independently or linked by the system 
loader preparatory to execution of the program. This capability provides much flexibility in combining, 
segmenting, overlaying, and ordering blocks for execution. 

Subprogram blocks consist of two types of source statements: 

• Symbolic machine instructions 

• Pseudo instructions 

Symbolic machine instructions are the counterparts of the binary machine instructions. They provide a 
means of expressing symbolically the data manipulation functions of the machine. Each symbolic 
instruction typically generates one machine instruction. 
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Pseudo instructions do not have a one-to-one relationship with binary machine instructions. They are used, 
instead, to control aspects of the assembly process, such as: 

• Storage allocation 

• Symbol definition 

• Subprogram linkage 

• Listing options 

• Automatic generation of predefined code sequences (macros) 

From CPU source language subprograms, COMPASS generates absolute or relocatable binary output 
acceptable for loading and execution. From PPU source language subprograms, COMPASS generates 
absolute binary output to be loaded and executed on a peripheral processor unit. The operating system 
allows only specially privileged jobs to access a peripheral processor unit. 

Features inherent to COMPASS include: 

• Free-field source Size of source statement fields is largely controlled by user, 

statement format 

• Control of local Programmer and system can designate up to 255 areas to facilitate 

and common blocks interprogram communication. In CPU programs, common areas can be 

defined in small core memory (CM or SCM) or extended or large core 
memory (ECS or LCM). 

• Preloaded data Data areas may be specified and loaded in core memory with the source 

program. 

• Data notation Data can be designated in integer, floating-point, and character string 

notation. It can be introduced into the program as a data item, a constant, or 
a literal. 

• Address arithmetic Addresses can be specified making extensive use of constants, symbolic 

addresses, and arithmetic expressions. 

• Symbol equation and Equation and redefinition of symbols allow extensive parameterization 

redefinition of assembly and linkage of subprograms and subroutines. 

• Symbol qualification Ability to associate a symbol qualifier with a symbol defined within a 

qualified sequence to render the symbol unique to the sequence. An 
unqualified symbol is global and can be referred to from within any sequence 
without qualification. 

• Binary control The programmer can specify whether binary output is to be absolute or 

relocatable. Absolute code can be generated for any PPU or CPU. 
Relocatable code can be generated for any CPU. Binary can be written as 
overlays or-as partial records. 

• Selective assembly of Assembly-time tests allow the user to select or alter code sequences, 
code sequences 

• Mode control Ability to specify the base to be used for numeric notation not explicitly 

defined as octal or decimal, and to specify the code conversion to be applied 
to character data as either display code, ASCII, internal BCD, or 
external BCD. 
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• Listing control Assembly-time control of list content. 

• Micro coding Substitution of sequences of characters defined in the program whenever the 

micro name is referenced. Several micros are predefined by the system for 
user convenience. 


• Macro coding 


• Operation code table 


• Operation code 
definition 


Assembly of sequences of instructions defined in the program or on the 
system library whenever the macro name is referenced. Macro definitions 
can be redefined or purged from the operation code table. 

The programmer can specify or respecify the syntax of a CPU or PPU 
instruction. The assembler generates an entry in the operation code table for 
the instruction. No macro or opdef definition is associated with the entry. 

Assembly of sequences of instructions defined in the program or on the 
system library whenever an operation code of the specified syntax is 
referenced. 


• Code repetition 


Sequences of code can be repeated during assembly or at load time. 


• Remote assembly 

• Library routine calls 

• Diagnostics 


Defers assembly of defined coding sequence until later in the assembly. 
Routines can be called from the system library. 

Diagnostics for source program errors are included on output listing. 


1.1 CONFIGURATION 


The hardware requirements for executing COMPASS on a CPU are the minimum required for the operating 
system. 


1.2 ASSEMBLER EXECUTION 

COMPASS is called from the system library by a COMPASS control statement (chapter 10) or FORTRAN 
compiler upon encountering a COMPASS IDENT statement in the source input file. Parameters on the | 
control statement specify files used during the assembler run such as the file containing source statements 
and the files to receive listable output and load-and-go output. The COMPASS assembler executes as a 
CPU program. 

The operating system allocates the input/output resources as needed and performs all input/output required 
during the assembly. 

COMPASS assembles each subprogram on the source file, in turn, in two passes. During the first pass, it 
reads each source language instruction, expands and edits called sequences as needed, interprets the 
operation code, and assigns storage. 

The function of the second pass is to assign block origins, locate literals, fill in all valid symbol values and 
produce the assembly listing and binary output. Finally, it prepares the symbolic reference table and 
reinitializes itself preparatory to assembling the next subprogram. 

COMPASS alters its field length dynamically, thus ensuring that central memory requirements for tables | 
used by the assembler are satisfied. The assembler requests additional central memory as needed up to a 
threshold field length. (The threshold value is determined by the installation.) When the threshold field 
length is reached, the intermediate file and cross-references are transferred to the system mass storage 
device. If additional core is needed, the assembler continues to request central memory up to the 
maximum available to the job. (COMPASS may use any ECS/LCM space assigned to the job for table 
space.) If core requirements are still not satisfied, COMPASS aborts and issues a diagnostic message. 
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K r ° eeSSing - 0f maCr0S md similar definitions is handled in a single recursive push-down stack. 
COMPASS has a maximum recursion level of 400; that is, COMPASS allows nesting to a depth of 400. 


1.3 RELOCATABLE OBJECT PROGRAM EXECUTION 


When the assembler has completely processed the source deck, a control statement (for example, LGO) can 
be used to call for loading and execution of a CPU object program from the load-and-go file. The loader 
links the newly assembled subprogram to any previously assembled subprograms and subroutines referred to 
by the new program and to programs on any other files specified by the programmer. After all 
subprograms are loaded and linked, the operating system begins program execution at a location specified 
by one of the subprograms. Data for the object program can be on some programmer-specified file. 
Normally, this loading and execution does not take place if the COMPASS assembler detects fatal errors. 


1.4 INTERACTIVE PROGRAM DEBUGGING 

A COMPASS program that assembles without fatal errors can be executed under control of the CYBER 
Interactive Debug (CID) software. CID allows the programmer to correct errors in program logic from a 
terminal. Using CID, the COMPASS programmer can: 

• Suspend program execution at a specific location or upon occurrence of a specific trap condition, such 
as execution of a return jump instruction 

• Alter location content during program suspension 

• Resume execution at a specified location or at the location where suspension occurred 

A complete description of CID features and use is given in the CYBER Interactive Debug Reference 
Manual listed in the preface. 
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LANGUAGE STRUCTURE 


2 


2.1 STATEMENT FORMAT 

A COMPASS language source program consists of a sequence of symbolic machine instructions, pseudo 
instructions, and comment lines. With the exception of the comment lines, each statement consists of 
a location field, an operation field, a variable field, and a comments field. Each field is terminated by 
one or more blank characters. However, a blank embedded in a character data item, parenthesized 
macro parameter, or comments field does not terminate a field. The size of the variable field is re¬ 
stricted by the maximum statement size only. Statement format is essentially free field. 

Statements are 80-to-90 column lines. When punched on cards, each card is considered a line. A single 
statement may be composed of as many as ten lines. Information beyond column 72 is not interpreted 
by COMPASS but does appear on the assembly listing. Thus, columns 73-80 can be used for additional 
comments or sequencing. Column 81-90 are used for sequencing by library maintenance programs; they 
are normally not used by the programmer. A line that contains two or more consecutive colons may be 
read and printed as two lines because of operating system conventions for delimiting line images. 

2.1.1 FIRST COLUMN 

The contents of column one designate the type of line, as follows: 

, (comma) Designates the line as a continuation of the previous line. 

*(asterisk) Designates the line as a comments line, 
other Indicates the beginning of a new statement. 


2.1.2 LOCATION FIELD 

The location field entry begins in column one or two of a new statement line and is terminated by a blank. 
If columns one and two are blank, the location field has no entry. A location field entry is usually 
optional. It may contain a symbol or name according to the requirements of the operation field, or a 
plus sign (+) or a minus sign (-) (section 3.2.4). 


2.1.3 OPERATION FIELD 

If the location field is blank, the operation field can begin in column three. If the location field is 
nonblank, the operation field begins with the first nonblank character following the location field and is 
terminated by one or more blanks. The operation field is blank if there are no nonblank characters 
between the location field and column 30. The following are legal field entries: 

Central processor unit mnemonic operation code and, optionally, the variable subfields with each 
variable subfield preceded by a comma. 

Peripheral processor unit mnemonic operation code 
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Pseudo instruction mnemonic operation code 

Macro name 

Blank 

2.1.4 VARIABLE FIELD 

The contents of the operation field determine if any entry is required in the variable field which consists 
of one or more subfields separated by commas. The variable field begins with the first nonblank 
character following the operation field and is terminated by one or more blanks. It is blank if there are 
no nonblank characters between the operation field and column 30. 

A variable subfield contains one of the following: 

Data item 
Expression 
Register designator 
Name 

Special element 

Entry uniquely defined for the instruction 


2.1.5 COMMENTS FIELD 

Comments are optional and begin with the first nonblank character following the variable field or, if the 
variable field is missing, begin no earlier than column 30. The beginning comments column can be 
changed through the COL pseudo instruction (Section 4.4.5). 


2.1.6 COMMENTS STATEMENT 

A comments statement is designated either by an asterisk in column 1 or by blanks in columns 1-29. 
Comments statements are listed in assembler output but have no other effect on assembly. A statement 
beginning with * is not counted in line counts for IF-skipping (Section 4. 9) and definition operations 
(chapter 5) and is not included in definitions. A statement having columns 1-29 blank is counted. 


2.1.7 STATEMENT CONTINUATION 

Normally, column 72 terminates a source statement that has not yet terminated. However, a statement 
that cannot be contained in the first 72 characters can be continued on the next line by placing a comma 
in column one and continuing the field in column two. A maximum of nine continuation lines is permitted 
for a statement. The break between lines need not coincide with a field or subfield separator; even a 
symbol can be split between two lines. Continuation lines beyond the ninth, and continuation lines 
following a terminated statement are considered comment lines. 
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2.1.8 CODING CONVENTIONS 

Figure 2-1 illustrates a COMPASS coding form that establishes a coding convention as follows: 


Column 

Contents 

1 

Blank, asterisk,or comma 

2-9 

Location field entry or plus, or minus left justified 

10 

Blank 

11-16 

Operation field entry left justified 

17 

Blank 

18-29 

Variable field entry left justified 

30 

Beginning of comments 


All examples in this manual abide by this convention. 


CONTROL DATA 
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Figure 2-1. COMPASS Coding Form 
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2.2 STATEMENT EDITING 


COMPASS reads statements in sequence from the source file. It immediately edits and interprets each 
statement unless (1) it is a comments statement of the type indicated by an asterisk in column one, or 
(2) it is part of a definition, that is, it is a statement between a macro or OPDEF header and an ENDM, 
between a DUP or ECHO and an ENDD, or between an RMT pair. Statements within definitions are 
saved for editing and interpretaticn when the definition is referenced or expanded. ENDD and ENDM 
are part of the definition they terminate and are not edited. Statements within the range of a conditional 
(IF type) pseudo instruction are edited even when they are skipped. COMPASS performs two types of 
editing: concatenation, and micro substitution. 

2.2.1 CONCATENATION 

COMPASS examines the statement for the concatenation character p* and removes it from any field of 
the statement so that the two adjoining columns are linked. The most common use of the concatenation 
character is as a delimiter for a substitutable parameter name in a macro definition when there is no 
other type of delimiter already there to set off the parameter name. After the substitution takes 
place, the r~*- is superfluous and is removed by editing before the definition is interpreted. 

Each removal of r~* shifts the remaining columns in the statement left one character. This could 
become significant when comments follow a blank variable field because the comments would be 
shifted left and interpreted as a variable field entry rather than comments. 

2.2.2 MICRO SUBSTITUTION 

COMPASS examines the statement for pairs of micro marks #) that delimit references to micro 
definitions (chapter 7 ) and replaces each reference (including the micro marks) with the micro character 
string referenced. The string that replaces the reference in the statement can be a different number of 
characters than the reference so that after the substitution, remaining characters in the statement are 
shifted left or right, accordingly. If, as a result of micro substitution, column 72 of the last statement 
read is exceeded, the assembler creates up to a maximum of nine continuation cards, beyond which it 
discards excess without notification on the listing. No replacement takes place if the micro name is 
unknown or if one of the micro marks has been omitted. The micro marks and name remain in the line. 
In the first case, the assembler flags a nonfatal assembly error. However, a single micro mark is not 
illegal and does not produce an error flag. 

If the micro name is null (i. e., the two micro marks are adjacent) both micro marks are deleted and no 
error flag is set. \ 

The columnar displacement caused by a micro replacement could also affect the relationship of fields 
to the beginning comments column. For example, it could shift the operation or variable field right 
beyond column 30, or could shift comments left into a blank field. 

A line that contains two or more consecutive colons after editing may be printed as two lines because 
of operating system conventions for delimiting print lines. 

2.3 NAMES 

A name is a sequence of characters that identifies one of the following: 

Subprogram or overlay 
Block 
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Macro definition 
Remote definition 

Duplicated sequence (DUP or ECHO) 

IF sequence 
Micro 

A comma or a blank terminates a name. Concatenation marks and pairs of micro marks are removed 
before the name is scanned (see section 2.2 Statement Editing). 

A CPU subprogram name or overlay name is used for linkage with other subprograms. It must begin 
with a letter (A-Z) and is limited to seven characters maximum. Conventions imposed on names by 
the operating system could restrict the use of certain characters in names. There is no restriction on 
the first character for a PPU subprogram or overlay name. For a CYBER 70/Model 76 or 7600 PPU 
assembly, the name can be seven characters but for a CYBER 170 Series or a CYBER 70/Model 72, 

73, 74 or a 6000 Series PPU assembly it is limited to three characters maximum. In all cases, the 
last character of a subprogram or overlay name cannot be a colon. 

Any other type of name can consist of one to eight characters. A name does not have a value or 
attributes and cannot be used in an expression. 

The different types of names do not conflict with each other. For example, a micro can have the same 
name as a macro, or a subprogram can have the same name as a block, etc. 

2.4 SYMBOLS 

A symbol is a set of characters that identifies a value and its associated attributes. For an ordinary 
symbol, the first character cannot be a $ or = or : or a number; a symbol can be a maximum of eight 
characters. A symbol cannot include the following characters: 

+ - * / blank f F* or a 

Other special characters must be used with care, especially in ECHO and macro definitions (chapter 5). 
Conventions imposed on symbols by the operating system could restrict the use of certain characters 
in symbols. 

An external or entry point symbol is used for linkage with other subprograms and has additional 
restrictions (section 2. 4.1 Linkage Symbols). 

Concatenation marks or pairs of micro marks are removed before a symbol is examined (section 2.2 
Statement Editing). In CPU assemblies, to avoid conflict with register designators, a symbol cannot 
normally be An, Bn, Xn, where n is a single digit from zero to seven nor can a symbol be A.x, B.x, 
or X.x, because x is assumed to be a data item by the assembler. However, symbols resembling 
register designators can be used if each use of the symbol is prefixed by =S or =X (section 2.4. 2). 
Register designators are described further in Section 2.5. 

The process of associating a symbol with a value and attributes is known as symbol definition. This 
can occur in five major ways. 
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1. A symbol used in the location field of a symbolic machine instruction or certain pseudo 
instructions is defined as an address having the current value of the location counter (section 
3.2.2) and having an attribute defined as follows: 

Absolute for the absolute block 

Common for labeled or blank common blocks (relocatable assemblies only) 

Relocatable for local blocks other than absolute during pass one 
Absolute for local blocks during pass two of an absolute assembly 

2. A symbol used in the location field of definition pseudo instructions (section 4. 6) is defined as 
having the value and attributes derived from an expression in the variable subfield of the 
instruction. Certain of these pseudo instructions assign an attribute of redefinability to a 
symbol. Unless a symbol is redefinable, a second attempt to define it with a different value 
produces a duplicate definition fatal error flag. 

3. An external symbol is defined outside the bounds of the current subprogram and is declared as 
external in the current subprogram or is defined in relation to a symbol declared as external. 
In either case it has the attribute of external. Unlike a systems symbol, the true value 
definition is not known to the current subprogram. 

4. Definitions of systems symbols that take place outside of the current program can be 
carried over to the current program through the SST pseudo instruction. COMPASS uses 
the true definitions but assigns the additional attribute of systems symbol. 

5. COMPASS defines a symbol by default if a reference to a symbol is preceded by =S and the 
symbol is not otherwise defined in the subprogram. This feature is further described 

in section 2.4. 2 Default Symbols. 

There is no restriction on the number of times that the symbol can be referred to in the subprogram. 


Examples: 


Legal Symbols 


Illegal Symbols 


P 

R3 

PROGRAM 


5A 

ABCDEFGHI 

ABE+15 

=.11 


First character numeric 
Exceeds eight characters 
Contains plus sign 
First character equal sign 


2.4.1 LINKAGE SYMBOLS 

A relocatable subprogram can be linked to other subprograms through linkage symbols. The two types 
of linkage symbols are external symbols and entry point symbols. An external or entry point symbol 
can be a maximum of seven characters, the first character must be a letter (A-Z), and the last 
character must not be a colon. 


Any symbol declared as an entry point in a subprogram compiled or assembled independently of the 
current subprogram can be declared as an external symbol in the current subprogram. Any symbol 
declared as an entry point in the current subprogram can be declared as an external symbol in some 
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other subprogram. The symbol has a zero value and an attribute of external. An external symbol can 
be declared either through the EXT pseudo instruction or through default (a reference to the symbol is 
preceded by =X or =Y; see section 2.4. 2 Default Symbols). 

An external symbol can be’strong or weak. A strong external symbol reference causes the loader to try 
to find and load a subprogram having a matching entry point symbol. Failure of the loader to satisfy a 
strong external in this way is flagged as a non-fatal error by the loader. A weak external does not 
require the loader to search for a satisfying subprogram; however if one is loaded for some other 
reason, the loader associates the matching linkage symbols in the usual way. At the end of loading, the 
existence of unsatisfied weak external symbol references is not an error. 


External symbols can be defined in the subprogram relative to any external symbol declared in an EXT 
pseudo instruction. This is possible through use of symbol definition instructions that assign the value 
and attributes of an expression to a symbol. If the value of the expression reduces to an external symbol 
± an integer, the location field symbol is defined as having an integer value and external attribute. 

Entry point symbols and external symbols are not qualified (section 2.4.5). 

2.4.2 DEFAULT SYMBOLS 


When a symbol reference is preceded by =S, =X, or =Y and the symbol is not defined in the subprogram, 
COMPASS defines the symbol or declares it as a strong or weak external symbol, respectively, at the 
end of assembly. The =X and =Y forms are defined by default in relocatable assemblies only. 

=Ssymbol If symbol Is not defined, COMPASS assigns an address at the end of the zero 

block. All subsequent references to the symbol, whether preceded by =S or not, 
are to the location of the word. A default symbol cannot be used where a 
previously defined symbol is required. 

If the symbol is defined by a conventional method, COMPASS does not define it 
again but uses the programmer definition. 


=Xsymbol This option permits a programmer to define his symbols in a subroutine or link 

to them in another subprogram. If the programmer defines the symbol, the 
assembler uses the programmed definition. If the programmer does not define 
the symbol, the assembler assumes that the symbol is a strong external as though 
declared in an EXT pseudo instruction. A symbol prefixed by =X must conform 
to the requirements for external symbols. 


=Ysymbol This option permits a programmer to define symbols in a subroutine or to link 

to them in another subprogram that need not be loaded. If the programmer 
defines the symbol, the assembler uses the programmed definition. If the pro¬ 
grammer does not define the symbol and if it is not referenced elsewhere with an 
=X or =S prefix, or declared in an EXT pseudo instruction, the assembler 
assumes that the symbol is a weak external. A symbol prefixed by =Y must 
conform to the requirements for external symbols. 

The system does not define a default symbol and issues an error flag if a symbol is prefixed by both 
=S and =X, or is prefixed by =X or =Y, and is not defined conventionally in an absolute assembly. Default 
symbols are qualified by the qualifier in effect at the time of the =S reference. 


2.4.3 PREVIOUSLY DEFINED SYMBOLS 

Certain pseudo instructions require that a symbol in an expression be previously defined. This simply 
means that the symbol, before its use as an expression element, must be defined in a prior instruction. 
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2.4.4 UNDEFINED SYMBOLS 

A reference to a symbol that is never defined (not even by default) causes a U error flag to be placed to 
the left of the instruction containing the erroneous reference. 


2.4.5 QUALIFIED SYMBOLS 

A symbol defined when a symbol qualifier is in effect during assembly (section 4.4.3) can be referred 
to outside of the qualifier sequence in which it was defined through: 

/qualifier/symbol 


The feature permits the same symbol to be defined in different subroutines without conflict. An 
unqualified symbol is global and does not require a qualifier when it is referenced, unless a qualifier 
is in effect, and a symbol qualified by the same qualifier has been defined. In this case, the unqualified 
symbol can be referenced as // symbol. 

/• 

The combination of qualifier and symbol permits a value to be identified by a unique 16-character 
identifier. Linkage symbols are not qualified. 


2.5 CPU REGISTERS 

Register designators symbolically represent the 24 CPU operating registers. These registers are 
described more fully in chapter 8. The designators are inherent to COMPASS and cannot be changed 
during assembly. 

In a CPU assembly, symbols of the same form as register designators may be used if each occurrence 
of such a symbol is prefixed by =S, =X, or =Y (see section 2.4. 2). However, a warning message is 
issued when such symbols are defined. The prefix cannot be used in the location field of machine 
instructions and symbol defining, data generating, BSS pseudo instructions, in the variable field of 
ENTRY, EXT, and SST pseudo instructions. 


Register Type 


Address 

Index 

Operand 


Designator 


An or A. n 
Bn or B. n 
Xn or X. n 


For the forms An, Bn, or Xn, n is a single digit from 0 to 7. Any other value for n, for example 8, causes 
An, Bn, or Xn to be interpreted as a symbol rather than a register designator. 


For the forms A. n, B. n, X. n, n can be a symbol or an integer. If the value of n or the value of the 
symbol exceeds 7, the assembler truncates it to the least significant 3 bits and issues a warning flag. 


Registers designated by A1 through A5 or A. 1 through A. 5 are used for addressing to obtain information 
from central memory. Registers designated by A6, A7, A. 6, or A. 7 are used for addressing to place 
information into central memory. 
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COMPASS does not recognize registers in PPU assemblies; there, the designators are acceptable as 
ordinary symbols. 

Examples: 


A1 
A10 
A. 1 

A.NUM 
A.10 


Designates address register 1 
Interpreted as a symbol, not a register 
Designates address register 1 

If the value of NUM is 6, it designates address register 6 

Designates address register 2; however, it produces a warning flag because the 
two was derived from the truncation of 12, the octal value for 10. 


The following produce equivalent results. A SET pseudo instruction (section 4. 6. 2) defines SUM and 
SUB as absolute values 3 and 2, respectively. A reference to a SET-defined symbol produces the same 
result as if the value had been used directly. In this example, the address of ALPHA is 001000. 
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Code Generated 
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2.6 SPECIAL ELEMENTS 

The following designators are reserved for use as references to special elements and cannot be used as 
symbols. The use of a special element in an expression causes the assembler to replace it with a 
value specified by the element in the expression. The control counters are discussed further in 
section 3. 2. 

Designator Significance 

* or *L The assembler uses the value of the location counter for the block in use. 

The element is relocatable unless the counter in use is for the absolute block. 

*0 The assembler uses the value of the origin counter for the block in use. The 

element is relocatable unless the counter in use is for the absolute block. 

$ The assembler uses one less than the absolute value of the position counter 

for the block in use. 

*P The assembler uses the absolute value of the position counter for the 

block in use. 

*F The assembler uses an absolute value obtained as follows: 

0 COMPASS was called by a COMPASS control statement 

1 COMPASS was called by a RUN-type compiler 

2 COMPASS was called by a FTN-type compiler 

These designators are inherent to COMPASS and cannot be altered by the programmer during an 
assembly. 
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Examples: 
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2.7 DATA NOTATION 

Data notation provides a means of entering values for calculation, increment counts, operand values, 
line counts, control counter values, text for printing out messages, characters for forming symbols, 
etc. 

The two types of data notation are character and numeric. The assembler allows the user to introduce 
data in the program in three basic ways. 

As a data item 

As a constant in an expression 
As a literal 


2.7.1 DATA ITEMS 

Character and numeric data items can be used in subfields of the DATA (section 4. 8. 2) and LIT 
(section 4.8.4) pseudo instructions or as specifications of field lengths on VFD pseudo instructions. 

2.7.2 CONSTANTS 

A data constant is an expression element consisting of a value represented in octal, decimal, 
hexadecimal, or character notation. It resembles a data item but is restricted by its use as an 
expression element in two ways: j 
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1. The first character must be numeric, prohibiting the delimited type of character string 
(section 2,7.4) and the preradix for numeric values. 

2. The field size is determined by the destination field for an expression and can be a maximum 
of 60 bits thus prohibiting double precision floating point numbers. 

2.7.3 LITERALS 

A literal is a read-only constant. It is specified as a data item in a subfield of a LIT pseudo instruction 
or as an element in an expression. 

The method of specifying a literal in an address expression is nearly identical to that for specifying a 
data item in a DATA (section 4. 8. 2) or a LIT (section 4. 8. 4) pseudo instruction. The primary difference 
is that the literal is prefixed with an equal sign, which indicates that a literal follows. 

When a literal is used as an element in an expression, the expression is evaluated using the address of 
the literal in the literals block rather than the value of the data item. Thus, the literal is considered 
relocatable. (For a discussion of the literals block, see section 3.1.3), 


Conventionally, if a literal is used, it is the only element in an expression. 

The first use of a literal causes the assembler to assemble the data specified by the literal, and store 
the data in the literals block using as many words as are required to hold the data. If the binary pattern 
of the prefixed type of literal or of all the literals in a LIT declared sequence matches the binary 
pattern of words previously entered in the literals block, an entry is not generated for the 
data. This process eliminates duplication of read-only data. 

The LIT pseudo instruction permits symbols to be associated with literals block entries. Such entries 
can be referenced symbolically or through use of a prefixed literal. However, to preserve the integrity 
of the literals block, they should be used as read only locations. 

The assembly listing includes a list of the literals block when the D list option is selected (section 4.11.1). 
Example: 

In the following example, using CPU instructions, the first statement creates a word in the literals 
block having the value 00000000000000000001. The address of that entry (for the purpose of the 
example) is 5555 and is used in the address field of the two statements at address 100 and the state¬ 
ment at the lower part of 101. 

The literal in the second statement specifies a right justified character. A, which has a display code 
value of 1. The SB4 creates a one-word literal block entry having the value 00000000000000000002. 
The address of that entry is in the address field of statements at the upper half of addresses 101 
and 102. In this example, the LIT sequence duplicates a sequence of entries in the literals block 
and does not cause new entries to be assembled. 
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CONTENT OF LITERALS BLOCK. 


oo r >‘>‘>* ooco ! ’,;j-Tonp r. 

rj o j r. n ■; ■•■> r ••> g n -> "j r o y? .< 


Continuing the previous example, a LIT sequence as illustrated below, does not duplicate a sequence in 
the literals block and causes entries to be generated in the literals block: 



CONTENT CF LITERALS BLOCK. 


n os $<5*; oo nr ioooDOf i moonnQooi a 

005555 in'nn r i"r’oonr!Qr , '!moa? n 

005557 nnn n noo n nno r !T'j r, nnoni a 

o o'; c>F) t nnm{5anfi(ifc p, ionnQnn7 r 

0 n^fei TOOT OOnnooomOCqfJOO'* n 

oo^fp,? n' i nnnnnrnnn n nnnnoo r ’7 s 


However, if the literals sequence in the first part of the example had been followed by a LIT that 
duplicates, in part, the most recent entries in the literals block, only the unduplicated part is added 
to the block. Thus, if the following LIT sequence had been used in place of the LIT 1,3,1RD, 2, the 
first two words of the sequence would match the last two words of the literals block so that only two 
additional words would be required to complete the sequence. 



CONTENT OF LITERALS BLOCK. 


0 05555 onpflngfif’fooi’nnnonnoi a 

00555*1 ooonnoof’ooooooonaoo? n 

0 0 5 5 c 7 Tno n OGnooo€ r, no ,, nooo‘ 7 r 

qo^sfo nnooQonnnnononoonQou n 
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2.7.4 CHARACTER DATA NOTATION 


Character data strings are converted to the code in use at the time the string is evaluated (section 4.4.2, 
CODE pseudo instruction), and placed in a field indicated by the data type (data item, constant, or 
literal). When no CODE instruction has been issued, conversion is to display code representation. 

Format: Example 


Data Item 


Constant t 
Literalf 


sign 

0 

type 

string 

! 



or 



sign 

type 

d 

string 

3 


» 

type 

string 




- 

sign n type 

string 

or 

- 

sign 

type d 

string d 


-3RABC 


-R*ABC* 

3RABC 

=-3RABC 


=-R*ABC* 


= Applies to literals used as expression elements only; signifies that a literal follows. 

sign Optional for data item or literal. A sign with a constant is interpreted as an element 

operator. 

+ or omitted The value is positive 

The complemented (negative) value is formed 

n Signifies how the string is determined: 

omitted The string is delimited by d. n cannot be omitted for a constant. 

0 For data item or literal, the string consists of all characters following 

type to: 

blank or , 

For a constant, string consists of all characters following type to: 

+ - * / blank , or A 

n For a data item or literal, n is an integer count of the number of 

characters in the string not counting guaranteed zeros. It is limited 
only by statement size. 

For a constant, n is an integer count of the number of characters in the 
string. It cannot exceed 1/6 of the number of bits in the field that will 
contain the expression. A truncation error is flagged for a right 
justified constant if the most significant bit exceeds the field. Truncated 
zeros do not cause an error in this case, A truncation error is flagged 
for a left justified constant if the least significant bit positions are 
truncated, even if they are zero. 

The string consists of the n characters following type. 

Regardless of base, COMPASS assumes that n is decimal. 

t Expression element 


60492600A 


2-13 





Character string justification. The characters formed by the data item 
or constant are right or left justified into the destination field as follows: 

Type Significance 

C Left justified with zero fill. For data item or 

literal, 12 zero bits are guaranteed at the end of 
the string even if another word must be allocated. 
For a constant, C is the same as L; the 12 zero 
bits are not guaranteed. 


H Left justified with blank fill 

A Right justified with blank fill 

R Right justified with zero fill 

L Left justified with zero fill 

Z Left justified with zero fill. For data item or 

literal, six zero bits are guaranteed at the end of 
the string even if another word must be allocated. 
For a constant, Z is the same as L; the six zero 
bits are not guaranteed. 

A delimiting character used only when n is omitted. The characters 
between the first occurrence of d and the second occurrence of d form the 
string, d can be any character other than r* or +. 

Characters from one of the COMPASS character sets (appendix A), except 
for those characters that act as delimiters (see n and d), the concatenation 
character (r*), and pairs of micro marks (/). 

Concatenation marks and pairs of micro marks are removed by editing 
before a string is examined. A single micro mark can be used in a string. 

An empty or omitted character string is defined under one of the following 
conditions: 

• n is 0 and type is immediately followed by a delimiter, for 
example, OL. 

• n is omitted and the two delimiting characters are adjacent, for 
example, H++. 

Omission of a string in a DATA pseudo instruction is legal and does not 
cause generation of a data word. 

For a constant, an omission of the string is valid and has a zero value. 

An omitted string in a LIT pseudo instruction is legal and does not cause 
generation of a literal for that item; however, the LIT must contain at 
least one non-empty data item. 

An omitted string for a literal in an expression is not legal and produces an 
error. 

It is not possible to generate empty strings using types C, Z, R, or A. 
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Examples of character data: 


In these examples, characters are converted to display code representation; all lines of code 
generated by DATA are printed only if the D or G list option is selected. 

Data Items 


Location Code Generated 


144 0 5?;• ? 217 2?' 5111 5b520 

1 4 5 0 U ? 1 e 5 0 f 1 0 0 0 n •■) c Q Q 0 n 0 1 

14b 5 5 555 b 65555 5555 5 5 565 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


t 


H 

18 

1 30 




0 A T5 

L*£RPJR 

lil P'Jil 



Location Code Generated 


1100 1/25 

1101 2420 

110 ? 2524 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


II 

16 

ho 



PPU 


—f_- 

1 



D* T A 

0LCUTPUT 

1 


Constants 

Location Code Generated 


4/22 

4/23 

/130000U4/ 

/ 1400000-j0 

4/?4 

511103111/ 

5260530000 

4725 

111/240155 

0155555531 

4/2o 

1/25242025 

2400000001 


O/OOCIOOUQ 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 ho 



5X3 

IP* 


TAG 

5X4 

1R<*. 11 i 



S A 1 

3 PC 10 I 



i> do 

X 0 41L S 1 



VFU 

30/4HIOIA,6/1KA ? 24/jAx+1 



VFD 

42/0LOUTPUT >13/1 



VFD 

15/0LG,15/0Lj 


Note that the character constant in the expression in the second line consists of a decimal point 
(57 in display code) to which 01 is added before the value is stored. Similarly, in the third field 
of the first VFD, 1 is added to the display code representation of X right justified with blank fill 
(55555530) so that 55555531 is generated. 
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Literals 


Location Code Generated 


10 on 03765 
100003770 

265? 511000377? + 

5120003774 
2653 5130003767 + 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


TfiGl 

LIT 

LIT 

*41 

S A ? 

RM--*/ { A ,6L ) S= , . ,0CO , 0L 
^QHLITERALS 

=octfnchapfts 

-H+LFFT JUSTIFY WITH PLANKS+ 

= 0 L 0 


CONTENT OF LITERALS BLOCK. 


0 

03765 

000 

00 0 0 

0004546475 

05 

1 

0 

03766 

525 

7545 

5565700000 

0 0 

0 

0 

03767 

330 

00 00 

0000000000 

00 

0 

0 

03770 

141 

1240 

5220114275 

55 

5 

0 

03771 

5555555 

5555555565 

55 

5 

0 

03772 

240 

5160 

3100122032 

42 

3 

0 

03773 

000 

000 0 

0000000000 

00 

0 

0 

03774 

140 

5062 

4551225232 

41 

1 

0 

03775 

063 

155? 

7112410550 

21 

4 

G 

07776 

011 

613? 

3555555555 

555 


+ -*/< 

>*■= 

0 

LITERAL* 

TFNCHfiRCTS 

LEFT JUSTI 
FY WITH PL 
ANKS 


The first LIT pseudo instruction generates three words in the literals block; the OL item is an empty 
string and does not produce an entry. The second LIT pseudo instruction generates one two-word 
entry. The expressions in the variable fields of the SA1, SA2, and SA3 instructions each consist of a 
literal element. The character strings in the SA1 and SA2 literals do not duplicate former literals 
block entries so COMPASS generates new entries. However, since SA3 references an existing entry, 
COMPASS places the address of the entry in the address field of the instruction. 


2.7.5 NUMERIC DATA NOTATION 

Numeric data can be specified in octal or decimal notation. The value is converted to an integer or a 
floating point value in single or double precision. 


Formats: 

Data Item 

Constant 

Literal 


sign 


preradix value 


modifiers 


value 


modifiers 


sign 

preradix 

value 

modifiers 
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= Applies to literals only; signifies that a literal follows. 

sign Optional for data item or literal; a sign with a constant is interpreted as an element 

operator. 

+ or omitted The value is positive 

The complemented (negative) value is formed 

preradix Optional for data items and literals; cannot be used for constants. The preradix 
indicates the notation used for the value. 

omitted Notation can be specified by a postradix modifier or can be 

assumed from the assembly base. See BASE pseudo instruction. 

B or O Octal notation 

D Decimal notation 

value A series of octal or decimal digits optionally consisting of an integer, a decimal (or 

octal) point, and a fraction. An integer value (fixed point) does not contain a point. 

A floating point value (legal in CPU assemblies only) is noted by the occurrence of 
the point. 

An octal value can be a maximum of 20 significant digits (fixed point) or 32 significant 
digits (floating point). An octal value cannot include 8 or 9. A decimal value cannot 
exceed 1.15 x 10 18 (fixed point) or 7.9 x 10 28 (floating point, ignoring the decimal 
point). Extra significant digits cause erroneous results. 

If value is omitted, it is assumed to be zero. 

modifiers Associated with the value are the following optional modifiers specified in any sequence. 

A specific type of modifier can be specified only once. A duplicate produces an error 
flag. 

postradix Indicates the notation used for the value. See preradix for legal values. 

An error is flagged if notation contains both a preradix and a postradix. 

decimal exponent Defines a power of 10 scale factor 

E+n or En or E Single precision 

EE+n or EEn or EE Double precision 

When the sign is plus or is omitted, the exponent (n) is positive. 

When n is omitted, it is assumed to be 0. The value of n cannot exceed 

32767 and is always assumed to be a decimal integer. 

A fixed point value can be single precision (one word) only but a CPU 
floating point value can be generated in double precision (two words). 

If EE is used with a fixed point value, the assembler produces a fixed point 
number in single precision. 

The effect of the exponent is to multiply the value by 10 decimal raised 
to the n power. 
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Defines a power of two scale factor and is specified as follows: 

S+n or Sn or S 

When the sign is plus or is omitted, the scale factor (n) is positive. When 
n is omitted, it is assumed to be 0. The value of n cannot exceed 32767 
and is always assumed to be a decimal integer. 

The effect of the binary scale is to multiply the value by 2 raised to the 
n power. 

Applies to floating point values only and is specified as follows: 

P+n or Pn or P 

When the sign is + or omitted, n indicates the number of bit positions 
the point is to be shifted to the left of bit 0. When the sign is -, n 
indicates the number of bits the point is to be shifted to the right. 

The effect of P is to align the value so that the binary point occurs to the 
right of the nth bit. 

The exponent is adjusted to a value of - (+n) 

For example, a value with P-6 will have a biased exponent of 2006 g ; a 
value with P10 will have an exponent of 1765 g . 

If P is not specified for a floating point number or if n is omitted, the 
assembler generates a normalized floating point value. The P modifier 
permits generation of an unnormalized value. 

If, as a result of P, the most significant bit of the value is shifted out of 
the coefficient part of the single or double precision number, the assembler 
generates an overflow or underflow error. 

Although scale factors can exceed valid ranges, the ranges for numbers are restricted 
by the hardware. 

Example: 

38 

The number 1.0E4000S-1200 yields a number that is approximately 5. 8 x 10 
and is in range of the floating point representation. 

All calculations are performed in 144-bit precision. The values are rounded to 96 
bits for double precision and to 48 bits for single precision floating point numbers and 
to 60 bits for integers. 

The order in which the assembler acts on the modifiers, regardless of the sequence 
in which they are specified is: 

1. Decimal exponent (single or double) 

2. Binary scaling 

3. Binary point position (CPU assemblies only) 


binary scale 


binary point 
position 
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CPU Numeric Data Items 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 



1 


H 

18 130 

5 00 0 

77777777777777777742 


POOL 

DATA 

-29 ! 

5001 

17235000000000000000 


NUH 

OAT A 

1.0EE1 

5002 

16430000000000000000 




1 

5003 

20000000000000000012 



DATA 

1.0F+1P0 1 

5004 

17760000000000000002 



DATA 

3.2P1S-5E1 1 

5005 

17154651767635544264 



OATH 

0.0151E«- 01 1 

5 006 

17200314631463146314 



DATA 

0.1P47,-E,DEES 

5007 

77777777777777777777 




I 

5010 

00000000000000000000 




1 


CPU Numeric Constants 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

130 

5001 + 
555 

5012 

5112 20360 

43760 

7150400000 


ALPHA 

VAL 

EQU 

EQU 

PS57 

LX3 

WX7 

SX5 

POOLp-1 

5559 

100P 

-149 

40 

1S17 

- ( - 

1 

1 

1 

1 


CPU Numeric Literals 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

5113 5150005151 ♦ 

5130005152 «■ 
5153 

5155 

5156 

5157 

1 


" . ..J 

18 130 


APLE 

SA5 

SAT 

LIT 

LIT 

LIT 

LIT 

=200467550002340000049 
= 1.1 1 

1.0EE1 j 

0.1P47 

-DIP I 

0.0151E+01»-E»0EES 


CONTENT CF UTERUS BLOCK. 


005151 200*675500023*000004 
005152 17204314631463146315 
005153 17235000000000000000 
005154 16*30000000000000000 
005155 17200314631463146314 
005156 77777777777777777754 
005157 1715*651767635544264 
005160 77777777777777777777 
005161 OOOOOOOOOOOOOOOOOOOO 


po* ei o 

OPBLlLtLIW 

OS/ 

NB 

OPCLILtLlL 

9 **« 9 * 9 « 9 * 

0M- ('"‘2=7/ 
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Examples of numeric data (assume default radix is decimal): 


PPU Data Items 



302 0013 

303 0030 

304 0002 


PPU Constants 



PPU Literals 


Location 

Code Generated 


LOCATION OPERATION 

VARIABLE 

COMMENTS 



1 

II 

18 

1 30 


311 2000 1103 LDC =100 

313 2100 1104 AbC =-l 

315 2000 1105 LOC -7777 


CONTENT OF LITERALS BLOCK. 

1103 0012 J 

1104 7 776 imtm** 

1105 7771 ?? 
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2.7.6 HEXADECIMAL DATA NOTATION 


Numeric data can be specified in hexadecimal notation. The value is converted to an integer in single 
precision. 


Formats: 
Data Item 

Constant 

Literal 


sign 0 preradix 

value modifiers 

B 

preradix 

value 

modifiers 



sign 

Ql 

preradix 

value 

modifiers 


sign 


0 


preradix 


value 


Applies to literals only; signifies that a literal follows. 

Optional for data item or literal; a sign with a constant is interpreted as an element 
operator. 

+ or omitted Value is positive. 

Complemented (negative) value is formed. 

The zero is optional for data items and literals but must be present for constants, so 
the preradix will not be taken as the first character of a symbol. 

Must be present to indicate that a hexadecimal value follows. The preradix character 
is s or # depending on the printer used. 

A series of hexadecimal digits. Each hexadecimal digit represents 4 bits and is either 
a decimal digit 0-9 or a letter A-F. The digits 0-9 represent values 0-9 and the letters 
A-F represent the decimal values 10-15. 

The value may contain up to 26 significant hexadecimal digits. No radix point is 
permitted. If value is omitted, it is assumed to be zero. 


modifiers The binary scale (S) modifier is optional and has the same form and meaning as for 
octal and decimal data (see section 2.7.5). 

The binary point position (P) modifier is permitted but ignored, since it does not 
apply to integer values. 


Examples of hexadecimal data: 

Location Code Generated 


0 0000000GO30004435274 

1 771 77777 ’77777777777 

2 77777777777*75252525 

3 OOOOOOOODOOl l(J640 

4 OOODQOQQOCOv53Q12566 

5 7 1 2 J « 0 j ;j 16 + 


o 77777777777776671353 



LOCATION 

OPERATION 

. VARIABLE COMMENTS 

1 


M 

18 (30 




... ■ -...-.| • • _ 



DATA 

5123A3C t ” = > -i'=AAAAA,rl234S12 


X 

C 0 :4 

1 

0 = AG15 7 6 j 


HEX 

S X 3 

= -E1234!sS2 j 


CONTENT 

OF LIT 

i*AL3 3L0CK. i 



1 

1 


2.8 EXPRESSIONS 

Entries in subfields of most source statements are interpreted as expressions consisting of a combina¬ 
tion of one or more terms. Each term consists of one or more elements joined by operators. A comma 
or a blank terminates the expression. 

An expression element can be a: 

Symbol Register designator (CPU only) 

Numeric or character constant Literal 

Special element 
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Examples of elements: 


ALPHA A. 7 3HABC 

$ X3 =10HOUTPUT 

*P 77BS3 

A term can be a single element or two or more elements joined by the following element operators: 

* Multiplication 

/ Division 

An expression can be a single term or two or more terms joined by the following term operators: 

+ Addition 

Subtraction 

A Logical minus (exclusive or) 

The exclusive or operator is printed as a (carat) in the CDC character set or as & (ampersand) in 

the ASCII character set. 

Rules: 

1. If the last element of a term is omitted, COMPASS provides an element of zero. For example, 
if ABLE is a symbol, ABLE*+3 is interpreted as the value of ABLE times 0 plus 3. 

2. Two successive elements are illegal. Note, however, that ** is legal because the first 
asterisk is interpreted as an element, the second asterisk is interpreted as an operator, and 
the blank is interpreted as a null element. 

3. A term can contain one relocatable or external element only. Thus, **ABLE, where ABLE is 
a relocatable address, is illegal because ABLE and * are both relocatable. 

4. The element to the left of a divisor must be absolute. 

5. Division by zero results in zero with no error. 

6. Two or more additive operators (+ or - or a ) in sequence are interpreted as having a term of 
zero value between them. 

7. If an expression begins with an additive operator (+ or - or A), COMPASS provides a term with 
zero value preceding the operator. 

8. All arithmetic in expression is performed in integer mode, even if an element is a floating 
point constant such as 2.3. Results are restricted to 60 bits; that is, if a term or value 
exceeds 60 bits, the excess high-order bits are discarded without comment. 

The operator that immediately precedes a register designator is the register operator, regardless 

of the placement of the designator in the expression. The register operator can be: 

+ - * or / 

Examples of expressions: 

ABLE Single term 

S-29 Two terms; $ and 29 
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l-*=3.14159EE+6 

*+3 

A8LE*4-72/NUM 

10B 

3«-A6-NUM 

1K=a1R/ 


Two terms; a constant and the address of a literal. COMPASS places the 
literal in the literal block and uses its address in the expression. 

Two terms} value of the location counter and numeric constant 3. 

Two terms, each consisting of two elements; the value of ABLE times 4, 
and 72 divided by the value of NUM. 

Single term consisting of a numeric constant. 

The components of the expression are register A6 and 3-NUM. 

The character constants (= and/) are logically differenced. 


2.8.1 TYPES OF EXPRESSIONS 

Evaluation during assembly reduces an expression to: 



An absolute value (absolute address or an 
An external symbol + a 21-bit integer 
+ relocatable value + a 21-bit integer 
Register designators and one of the above 
Register designators 


integer value) 


CPU assembly only 


Absolute Expressions 

An expression is absolute if its value is unaffected by program relocation. An expression can be 
absolute, even though it contains relocatable terms, under these two conditions: 

1. The expression contains an even number of relocatable elements 

2. The relocatable elements must cancel each other. That is, each relocatable element (or 
multiple thereof) in a block must be canceled by another element (or multiple thereof) in the 
same block. In other words, pairs of elements in the same block must have signs that oppose 
each other. The elements that form a pair need not be contiguous in the expression. 


Examples of absolute expressions: 


In the following examples, EASY and FOX are relocatable in the same block. MIKE is absolute. 
The control counters are for the block that contains EASY and FOX. 

EASY-FOX +MIKE EASY and FOX cancel each other. 


FOX-* 

MIKE+16 
EASY-FOX *2+* 


FOX and the location counter cancel each other. 
The expression contains no relocatable elements. 
EASY and the location counter cancel 2 times FOX. 
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Relocatable Expressions 


An expression is relocatable if its value is affected by program relocation. A relocatable expression 
consists of a single relocatable term or, under these two conditions, a combination of relocatable and 
absolute terms: 

1. The expression does not contain an even number of relocatable elements 

2. All the relocatable elements but one must be organized in pairs that cancel each other. That 
is, for all but one block, each relocatable element (or multiple thereof) in a block must be 
canceled by another element (or multiple thereof) in the same block. The elements that form 
a pair need not be contiguous in the expression. 

3. The uncanceled relocatable element can have three kinds of relocation: 

a. Positive program 

b. Negative program 

c. Positive common (Negative common relocation is not permitted by the loader). 

Examples of relocatable expressions: 

In the following examples, EASY and FOX are relocatable in the same block. MIKE is absolute. 
LIMA is relocatable in a different block. The control counters are for the block that contains 
EASY and FOX. 

LIMA+MIKE-16 

FOX-EBSY+FOX 

3*F0X-«?*F flSY 

EASY-**FOX 

FOX-1009/MIKE 

-MIKE*2*LIMA 

=19HMESSAGE 33 


-*0 

The pairing of relocatable terms cancels the effect of relocation because both terms would be relocated 
by the same amount. The comparative value of the two terms remains the same regardless of program 
relocation. 


External Expressions 

An expression is external if its value depends upon the value of a symbol defined outside of the current 
subprogram. Either an external expression consists of a single positive external term or under the 
following conditions an external expression may consist of an external term, relocatable terms, and 
absolute terms. 


2-24 


60492600A 




1. The expression contains an even number of relocatable terms. 

2. The relocatable elements must cancel each other. That is, each relocatable element ( or 
multiple thereof) in a block must be canceled by another element (or multiple thereof) in the 
same block. In other words, pairs of elements in the same block must have signs that oppose 
each other. The elements that form a pair need not be contiguous in the expression. 


Examples of external expressions: 

In the following examples, XYZ and ABC are external symbols. EASY and FOX are in the same 
block. The control counters are for the block that contains LIMA. MIKE is absolute. 

XYZ- ¥ +F0X-EASY4-LIMA The pairs * and LIMA, and FOX and EASY cancel each other. 

F0X-3*£ASY+2*F0X+XYZ The relocatable elements all cancel. 


abc+ioob 


XYZ+ABC 

Illegal 

-ABO*-LlMA 

Illegal: 

XYZ**Q 

Illegal; 


both are external 
ABC is negative 

♦O is an unpaired relocatable element 


Register Expressions 

An expression is a register expression if, in a CPU assembly, it reduces to one or more register 
designators and an operand. The attributes of the operand can be that of an absolute, external, or 
relocatable expression. Use of register expressions is generally restricted to symbolic CPU machine 
instructions (Sections 8.4 and 8.5). If the register designator is the first element in the expression, 
the operator can be omitted and is assumed to be +. 

Examples of register expressions: 


In the following examples, XYZ is an external symbol and LIMA is a relocatable symbol. 


X3+LIHA-10B 
LIMA+X3-10B 
-10B+LIMA+X3 
BitXYZ 
•+A.NUM 


l Produce identical results 


/ 


Evaluatable Expressions 

An evaluatable expression is an expression that does not contain any symbols as yet undefined. Certain 
pseudo instructions require that the expressions be evaluatable. 
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2.8.2 EVALUATION OF EXPRESSIONS 


When evaluating an expression, COMPASS replaces each element with a 60-bit value. A character 
constant is first right or left adjusted in a field the size of the destination field and then extended to 
60 bits. Signs are extended for 21-bit quantities, that is, for counters, addresses, and symbols. In 
division, the integral portion of the quotient is retained; any remainder is discarded. Thus, 5/2*2 
results in 4. 

COMPASS forms a term value by interpreting each element and operator from left to right until it 
reaches a + or - or a operator. It then notes whether or not the newly formed term contains a 
relocatable or external symbol or register designators. The value of the symbol is added, subtracted, 
or differenced from the cumulative sum of the absolute elements, relocatable elements, or external 
values. The assembler continues evaluating the expression until it is reduced to a symbol and/or a 
value. An error is flagged if the expression cannot be reduced. The expression value is truncated, if 
necessary, and placed in the destination field. If it is too large for the field, the system issues an 
error flag. The maximum field size for an expression is 60 bits. 

The value of an external symbol is zero if the external symbol is defined outside of the subprogram. 

It is the value relative to the external used in defining the symbol if the external symbol was defined 
within the subprogram. 

A zero value is used in place of a register designator. 

For pass one evaluation, the system uses the value of a relocatable symbol relative to the block in 
which the symbol was defined. For pass two evaluation, the system uses a value relative to program 
or common block origin. 

The field size for an expression depends upon the instruction and is determined as follows: 

1. For a symbol definition pseudo instruction, the expression value (including character 
constants) is justified in a 21-bit field. 

2. In a VFD pseudo instruction, the expression is placed in a field of the size specified. 

3. For a CON pseudo instruction, the field size is one word (12 bits for PPU assemblies, 

60 bits for CPU assemblies). 

4. In a symbolic machine instruction, values of expressions are placed in address fields (18 or 
6 bits for CPU assemblies; 18, 12, or 6 bits for PPU assemblies). 

Some relocatable program loaders may give unexpected results if relocatable or external address values 
are assembled into the same field of the same word more than once, as a result of ORGing backward 
over the word, or by having more than one subprogram preset a common block. The ORGC pseudo 
instruction (see section 4.5.3) can be used to avoid such problems. 
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PROGRAM STRUCTURE 


3 


This chapter is designed to give the programmer a better understanding of how a program is assembled, 
loaded, and executed. This discussion of program structure is at the machine executable level, the level at 
which code is loaded into memory and executed. 

A COMPASS subprogram consists of statements beginning with an IDENT pseudo instruction and ending 
with an END pseudo instruction. The user can designate a subprogram to be a main program by specifying 
a transfer address in its END pseudo instruction. 

The programmer can control the assembly of COMPASS source statements so that subprograms are divided 
into blocks of binary code. These blocks can be controlled during the loading process. The first section of 
the chapter presents subprogram block concepts and how the programmer and the assembler organize 
object code into blocks. Following this is a brief description of the counters used to control the blocks. 

A subprogram loaded into central memory can be either absolute or relocatable. An absolute subprogram is 
loaded at the same fixed address every time; a relocatable subprogram can be loaded into different 
locations, according to the available central memory at load time. Sections 3.3 and 3.4 discuss the 
structure of absolute and relocatable programs, respectively, and show the differences in block usage for 
both types. 

Limited available central memory occasionally requires the use of overlays and partial binary sections in 
lengthy programs. Section 3.4 covers the use of these important programming tools. 


3.1 SUBPROGRAM BLOCKS 

A subprogram, whether assembled as absolute or relocatable, can be divided into subprogram areas called 
blocks. As assembly of a subprogram proceeds, the assembler or the programmer designates that object 
code be generated or that storage be reserved in specific blocks. By properly assigning code sequences, 
data, or reserved storage areas to blocks through use of ORG or ORGC, USE or USELCM, a programmer 
can intersperse instructions for the different blocks. The assembler assigns locations in a block 
consecutively as it encounters instructions destined for the block. A symbol defined within a block is not 
local to the block. That is, it is global and can be referred to from any other block in the subprogram. To 
render a symbol local to a sequence of code requires use of the QUAL pseudo instruction (section 4.4.3). 

Blocks established between two IDENT instructions, or between an IDENT and END, form a group of 
blocks. COMPASS recognizes a maximum of 255 blocks in a single block group, 252 of which can be 
user-established. When COMPASS interprets an IDENT or END pseudo instruction, it begins pass two 
processing of the completed block group. 

In pass two all symbols are assigned absolute values, the table of block names is cleared, the list of USE, 
USELCM, ORG, and ORGC instructions is cleared, and block structuring restarts. For END, the symbol 
table is cleared before the next subprogram is assembled. If the group does not contain a USE instruction 
or if object code is generated (or storage reserved) before the first USE instruction, COMPASS places the 
code in the nominal block (identified as PROGRAM* on the listing). For an absolute program, the nominal 
block is the absolute block. For a relocatable program, the nominal block is the zero block. The user 
controls use of the nominal block and any user-established blocks through USE, USELCM, ORG, and ORGC 
pseudo instructions (section 4.5). Each occurrence of a non-redundant literal constant causes an entry in 
the literals block; otherwise, the user has no control of this block. 
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3.1.1 ABSOLUTE BLOCK 


The absolute block is the nominal block for an absolute assembly. It is identified by the name PROGRAM* 
on the listing. All code generated in the block is absolute. Each address symbol is defined during pass one 
as an absolute value relative to zero which is block origin. The code generated must be loaded and 
executed at the origin specified as the absolute block origin. 

Normally, a relocatable assembly does not contain an absolute block. It may have one established, 
however, if the programmer issues an ORG (or ORGC) request using an absolute value. The assembler 
generates text tables specifying absolute block relocation. The loader loads the absolute text when it 
encounters the text table, without manipulating any addresses. For a relocatable assembly, an absolute 
block is identified on the assembly listing by the name ABSOLUTE*. There is no ECS/LCM absolute block. 


3.1.2 ZERO BLOCK 

The zero block has the block name 0 and is the nominal CM/SCM block for a relocatable assembly. It is a 
local block; that is, it is not accessible to other subprograms. Upon completion of assembly, the assembler 
assigns any undefined default symbols at the end of the zero block. The zero block is identified by the 
name PROGRAM* on the assembler listing. 

I An absolute program has a zero block only if the program contains default symbols. In an absolute 
assembly, the zero block immediately follows the absolute PROGRAM* block. The zero block is also 
named PROGRAM*. 

There is no ECS/LCM zero block. 


3.1.3 LITERALS BLOCK 

COMPASS generates literal data entries in the literals block. It is local to a subprogram. The literals 
block is identified by the name LITERALS* on the assembly listing. COMPASS always assigns storage to 
the literals block immediately following the zero block. There is no ECS/LCM literals block. 


3.1.4 USER-ESTABLISHED LOCAL BLOCKS 

By using USE and USELCM statements, a programmer can establish local blocks in addition to those 
previously described for an absolute or relocatable subprogram. At the end of assembly, COMPASS assigns 
an origin relative to the nominal block to each user-established local block, in the sequence in which they 
are established. 

All of the CM/SCM local blocks are concatenated to form a single block, which is treated by the loader as 
a CM/SCM block whose name is unique to the subprogram. Similarly, all of the ECS/LCM local blocks are 
concatenated to form a single block which is treated by the loader as an ECS/LCM block whose name is 
I unique to the subprogram. (SCOPE 2 does not currently allow LCM local blocks.) 

The length of each ECS/LCM block, including the combined local block, is rounded up, if necessary, to an 
integral multiple of eight 60-bit words. The maximum size of an ECS/LCM block is 1,048,568 words. 


3.1.5 LABELED COMMON BLOCKS 

A labeled common block is a storage area that can be preset with data accessible to one or more 
relocatable subprograms. These blocks are designated during assembly as being in CM/SCM or ECS/LCM 
through the USE and USELCM pseudo instructions respectively, where the name of the block is the name 
I enclosed by slashes; that is, /name/. The tables are designed so that the loader can allocate space in 
memory for the first subprogram that is loaded that declares the block. Thus, the first subprogram that 
names a block sets the maximum size of the block. Each subprogram, as it is loaded, can link to allocated 
blocks or can cause new blocks to be allocated. The contents of a labeled common block can be generated 
by any of the subprograms having access to it. 
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If an absolute subprogram attempts to establish a labeled common block by using a USE /name/ or USELCM 
/name/ pseudo instruction, COMPASS treats the block as a local block having the slash-enclosed name. 


3.1.6 BLANK COMMON BLOCKS 

A blank common block is a storage area that cannot be preset with data. That is, the loader does not load 
information into the area before the program is executed. 

For a relocatable program, the CM/SCM and ECS/LCM blank common blocks are allocated space by the 
loader after all subprograms are loaded, according to the largest block area declared by any of the 
subprograms. A CM/SCM blank common block is established through use of the USE pseudo instruction 
(section 4.5.1). An ECS/LCM blank common block is established through use of the USELCM pseudo 
instruction (section 4.5.2). A blank common block has no name. A USE // indicates blank common in 
CM/SCM; A USELCM // indicates blank common in ECS/LCM. 

If no relocatable program declares a blank common block, there is none. If an absolute program contains a 
USE // or USELCM // pseudo instruction, COMPASS treats the block as a local block named // and data can 
be stored in this block. 

The USELCM pseudo instruction can occur only in CPU programs. 


3.1.7 REDUNDANT BLOCK NAMES 

A CPU subprogram may have two blocks with the same name and the same memory type if they have 
different block types (local or common). Furthermore, a CPU subprogram may have two blocks with the 
same name and the same block type if they have different memory types (CM/SCM or ECS/LCM). Thus, 
altogether, there may be up to four different blocks with the same name. 


3.2 BLOCK CONTROL COUNTERS 

For each block used in a subprogram, COMPASS maintains three counters: an origin counter, a location 
counter, and a position counter. When a block is first established or its use is resumed, COMPASS uses the 
counters for that block. During pass one, the origin and location counters are initially zero. During pass 
two, as the assembler constructs the program, it assigns an initial value to each local block origin counter 
and location counter. Thus, expressions containing relocatable symbols are not necessarily evaluated the 
same in pass one and pass two. 


3.2.1 ORIGIN COUNTER 

The origin counter controls the relative location of the next word to be assembled or reserved in the block. 
It is possible to reserve blank storage areas simply by using either the ORG, ORGC, or BSS pseudo 
instructions to advance the origin counter; ORG and ORGC also permit the programmer to reset the 
counter to some lower location in the block or to change blocks. BSS allows the programmer to decrement 
the counter but not to change blocks. The origin counter is incremented by one for each word assembled or 
skipped forward. The origin counter is decremented by one for each word skipped in the reverse direction. 

When the special element *0 is used in an expression, the assembler replaces it by the current value of the 
origin counter for the block in use. 
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3.2.2 LOCATION COUNTER 


The location counter is normally the same value as the origin counter and is used by the assembler for 
defining symbolic addresses within the block. The counter is incremented whenever the origin counter is 
incremented. It is possible through the LOC pseudo instruction to adjust the location counter so that it 
differs from the origin counter. This may be desirable when the code being assembled is to be loaded at 
one location and subsequently moved and executed St another location. In this case, the programmer resets 
the location counter to reflect the actual location at which execution is to occur. As another example of 
its use, the programmer assembling a large table may reset the location counter to zero so that on the 
listing, the addresses alongside each word of the table reflect the word's position in the table rather than in 
the block. Note that use of this technique does not alter the placement of code in the block. (For an 
example of these applications, see the LOC pseudo instruction, section 4.5.5.) When either of the special 
elements * or *L is used in an expression, the assembler replaces it by the current value of the location 
counter for the block in use. 


3.2.3 POSITION COUNTER 

I Assume that bits are numbered 59 through 00, from left to right within a 60-bit CPU word and numbered 11 
through 00 within a 12-bit PPU word. Then, the position counter is initially 60 or 12, respectively, and 
indicates the number of bits remaining in the word. The position counter, which is decremented by one for 
each completed bit of an assembled word, becomes 00 when the word is completed, and is reset to 60 or 12 
when a new operation is started. 

For a CPU assembly, the 15-bit and 30-bit CPU instructions cause the position counter to normally have 
I values of 60, 45, 30, and 15 reflecting the placement in the word for the next instruction or data value to 
be generated. For a PPU assembly, the normal value is 12. 

The normal pattern of advancement for the position counter can be altered through use of the VFD and 
POS pseudo instructions. 

When the special element *P is used in an expression, the assembler replaces it with the current value of 
the position counter. 

When the special element $ is used in an expression, the assembler replaces it with the current value minus 
one of the position counter for the block in use; that is, it returns the next available bit position. 


3.2.4 FORCING UPPER 

In a CPU assembly, if any of the following conditions is true, the assembler packs parcels remaining in a 

partially completed word with no-operation instructions (section 8.1), sets the position counter to 60, and 

increments the origin and location counters before it assembles code for the next instruction: 

• Insufficient room remains in a partially filled word for the next instruction or data to be generated. 

• The current statement is a machine instruction, or a VFD pseudo instruction, with a location symbol 
or + in the location field. 

• The current statement is an RE, WE, PS, XJ, CC, CU, DM, or IM instruction for a CYBER 170 Series 
or CYBER 70/Model 71, 72, 73, 74, or 6000 Series. (The programmer can negate this force upper by 
placing a minus sign in the location field of the instruction.) 

• The current statement is an END, BSS, BSSZ, DATA, DIS, CON, SEGMENT, SEG, IDENT, ORGC, LOC, 
ORG, or MD pseudo instruction. 
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The assembler forces upper after it assembles code for one of the following: 

JP 

RJ 

Unconditional EQ 
Unconditional ZR 
ES (CYBER 70 Model 76 or 7600) 

MJ (CYBER 70 Model 76 or 7600) 

PS (CYBER 170 Series, CYBER 70 Model 71, 72, 73, 74, or 6000 Series) 

XJ (CYBER 170 Series, CYBER 70 Model 71, 72, 73, 74, or 6000 Series) 

IM (CYBER 70 Model 72 and 73) 

This post force upper does not occur immediately, but is deferred until the assembler encounters the next 
machine instruction or data generating, storage allocating, or binary control pseudo instruction in the same 
USE block. The programmer can negate the force upper following the instruction by placing a minus sign in 
the location field of the next instruction. Thus, pseudo instructions following one of the above machine 
instructions and referencing the origin, location, or position counter will use the value before the force 
upper. 

In a PPU assembly, no forcing upper occurs; the assembler ignores a + in the location field on any 
instruction other than a VFD. A plus or minus in the location field of a VFD in PPU assemblies forces the 
VFD data to begin at the next full word. 


3.3 RELOCATABLE PROGRAM STRUCTURE 

A CPU relocatable program consists of one or more subprograms that can be assembled separately, either 
in the same job run or in independent runs. The subprograms can all be written in COMPASS source 
language, or can be written in any other source language available in the product set of the operating 
system as long as the compiler or assembler produces relocatable binary output in a form acceptable to the 
loader. A COMPASS language subprogram is composed of instructions beginning with an IDENT pseudo 
instruction and ending with an END pseudo instruction. A subprogram can be either a main program or a 
subroutine, depending on how its END pseudo instruction has been written. 

When a program is loaded into memory, its subprograms occupy contiguous blocks of words. The first word 
in the first block is known as the reference address (RA). The total number of words in the blocks is the 
job field length. 

When a subprogram is relocated, each machine instruction in it that references a specific address must be 
adjusted. Because of this necessity, relocatable subprograms are assembled as though they begin at address 
zero; they are not assigned specific origins. In this way the loader can load subprograms independently, yet 
contiguously; their origins are relative to RA. Since all addresses within the subprogram are relative to the 
first word address of the subprogram, each address in the program effectively becomes a function of RA. 

A nonblank IDENT pseudo instruction that does not specify a fixed load address indicates a relocatable 
subprogram. Upon completing assembly of a relocatable subprogram, COMPASS assigns each local block an 
origin relative to the zero block. Each block thus becomes an extension of the zero block (figure 3-1). 

COMPASS also provides for subprogram linkage. Through pseudo instructions such as ENTRY, ENTRYC, 
and EXT, subprograms can transfer control to each other and access common storage locations. 

The loader is thus able to load subprogram blocks independently, as required. Program execution is not 
affected by the relocation process. 

The length of the subprogram given on the assembly listing is the sum of the final values of the origin 
counters for the local blocks, including the zero block and literals block, but not the absolute block. Any 
absolute text is simply inserted at the absolute location relative to RA. 

COMPASS binary output for a relocatable subprogram consists of one section for each LCC pseudo 
instruction (if any) in the source program, followed by one section containing the subprogram loader tables. 
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3.4 ABSOLUTE PROGRAM STRUCTURE 

An absolute program consists of code that is not relocatable and must be loaded at specific memory 
locations. Because the loader performs no address manipulation for absolute programs, absolute code can 
be loaded more rapidly than relocatable code. 

A CPU program can be either relocatable or absolute. PPU programs are always absolute. PPU programs 
are parts of the operating system that reside in the peripheral processors; they are normally the concern of 
only system analysts. Any user can assemble PPU code, but cannot execute it without special system 
access privilege. 

The programmer has the option of constructing an absolute program as a single unit, or of dividing it into 
overlays. Each overlay consists of data, information, or instructions that are needed at different times. 
Dividing a program into overlays allows several routines to occupy the same central memory storage 
consecutively so that total storage requirements for a program are reduced. For maximum program 
efficiency, the reduction of storage requirements must be weighed against an increase in execution delay 
while loading parts of the program. 

During assembly of an absolute program or overlay, COMPASS creates a memory image of the absolute 
code. During pass two, it assigns each block an origin relative to the absolute Dlock. Any relocatable 
symbol is reassigned an absolute address; each block effectively becomes an extension of the absolute block. 

Figure 3-2 illustrates the structure of an absolute program that is not divided into overlays. The absolute 
block is the nominal block for the program (labeled PROGRAM* on the listing). The use of default symbols 
and literals causes the generation of the zero block and the literals block, respectively. Local blocks A, B, 
and C follow the literals block. The transfer symbol in the END pseudo instruction indicates a main 
subprogram. In the binary load module the'prefix (PRFX or 7700g) table and the header table precede 
the binary section that is the memory image of the program. 
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Figure 3-2. Absolute Program Structure 
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The binary output for the program consists of a section for each overlay. Note that the binary section for 
an absolute program that is not divided into overlays has the same format as the main overlay of a program 
divided into overlays. The user has the option of writing part of a binary section at a time by using either a 
SEG pseudo instruction or an IDENT (other than the first IDENT) with a blank variable field. 

An absolute binary load module usually has three parts: a prefix (PRFX or 7700 8 ) table, a header table, 
and the binary image of the program or overlay. A header table can be one of the following: 

• ASCM or 5 OOO 3 . 

• EASCM or 5100g. 

• ACPM or 5300 8 . 

• EACPM or 5400 8 . 

Tables are shown on a COMPASS listing by their octal numbers. The table formats are described in the 
Loader reference manual. 

The amount of binary written as a result of the binary control instruction (IDENT, SEGMENT, SET, or END) 
is subject to whether or not an entire block group is written, as follows: 

• If a complete block group is being written (everything between an IDENT and an END or between two 
IDENT instructions), the memory image of the program or overlay ends with the maximum origin 
counter value for the last block established, that is, with the last word address. 

• If only a portion of the binary for the block group is being written, it consists of the memory image of 
the program or overlay ending with the value of the current origin counter. 

END, SEGMENT, and a nonblank IDENT complete one overlay and write an end of section. SEGMENT and 
IDENT write header information for the overlay to follow. 


3.4.1 ABSOLUTE OVERLAYS 

When an absolute program contains more than the one IDENTpseudo instruction or contains SEGMENT 
pseudo instructions, COMPASS does not prepare just one section of a memory image of the program as it is 
assembled, but, instead, generates a section for each overlay. 

Dividing the program into overlays permits memory to be sequentially overlaid by different subroutines and 
data during program execution, reducing the maximum memory requirements for the program. 

Three levels of overlays can be generated for a CPU assembly: main, primary, and secondary. Each 
overlay is identified by a level number specified in the IDENT or SEGMENT pseudo instruction. The level 
number consists of an ordered pair of octal numbers, each of which can be 0 through 77 8 . The first 
number is known as the primary level number; the second is known as the secondary level number. The 
level number 0,0 signifies the main overlay (normally the portion of the program following the first 
IDENT). A primary overlay is indicated by a nonzero primary number paired with a zero secondary level 
number. For a secondary overlay both the primary and the secondary level numbers are nonzero. 

Conventionally, the main overlay is loaded first and remains in central memory throughout execution. Only 
two other overlays can remain loaded concurrently: these are usually one primary overlay and one of its 
associated secondary overlays. 


^IDENT instructions described in this section are assumed to have nonblank parameters. The special case 
of the blank IDENT is described in section 3.4.3. 
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The hierarchy of overlay association is depicted by figure 3-3. The primary overlay 1.0 has three 
associated secondary overlays numbered 1,1; 1,2; and 1,3. A primary overlay and all of its associated 
secondaries have the same primary level number. The next branch of overlays (indicated by level 
numbers 77,y) shows that the level numbers of the overlays are not required to be consecutive nor to be 
indicative of the order in which they were generated. 



Secondary 

Overlays 


Primary 

Overlays 


Main 

Overlay 


Figure 3-3. Overlay Hierarchy 

The main overlay can call both primary and secondary overlays into main memory via the operating system 
loader. (For detailed information concerning loader calls, see the Loader reference manual.) Once a 
primary overlay is loaded, it can call any of its associated secondary overlays. Overlay 23,0, for example, 
can call overlays 23,10; 23,30; and 23,40 in any order. 

The main overlay can have multiple entry points: execution can begin at any one of them. Usually, 
primary and secondary overlays have a single entry point which provides the transfer address. A secondary 
overlay can reference entry points in its primary and in the main overlay. A primary overlay can reference 
entry points in the main overlay. The programmer must ensure that the necessary entry points have not 
been overwritten. 

These conventions concerning the numbering, hierarchy, loading, and execution of overlays are not 
enforced by COMPASS. Any overlay can call the operating system loader to load another overlay, and any 
overlay can reference addresses in any other overlay. However, overlays are not all in central memory 
during program execution and the sequence in which the overlays are loaded and executed is beyond the 
scope of the assembler; therefore, it is the user's responsibility to assure that an overlay does not refer to 
symbols, instructions, or data not concurrently in central memory. 

Although PPU overlays are not identified by level numbers, they resemble CPU overlays in all other 
respects. However, a PPU overlay with assembled code in locations 7774g through 7777g may load 
incorrectly due to wraparound to location 0000. 

Overlays generated by using IDENT pseudo instructions differ in certain respects from overlays generated 
by using SEGMENT instructions, as described below. 

Binary formats for overlays are described in the Loader reference manual. 
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IDENT-Type Overlays 

An ID ENT-type overlay consists of the portions of the program from; 

• One IDENT to (but not including) the next IDENT 

• The last IDENT in the overlay to the END 

IDENT provides the programmer with the option of specifying the overlay level numbers with each 
overlay. The assignment of unique level numbers enables the loader to locate a specified overlay among 
overlays written on the same file. If the programmer does not specify level numbers for a CPU assembly, 
COMPASS assigns numbers 0,0 to the first overlay, and numbers 1,0 to all subsequent overlays. 

The first IDENT causes COMPASS to generate the program or overlay identification information that 
precedes the absolute section. Upon encountering a second IDENT instruction before an END instruction, 
COMPASS generates output consisting of a memory image of the overlay, starting with the overlay origin 
specified on the previous IDENT and normally ending with the maximum origin counter value of the last 
block declared in the overlay; that is, the overlay normally ends with the last word address of its last 
block. An IDENT subsequent to a SEG or SEGMENT, however, generates binary that ends at the location 
specified by the current origin counter. Following the memory image, COMPASS writes an end-of-section 
(or end-of-record) and the overlay identification information specified by the new IDENT for the overlay to 
follow. 

For an IDENT-type overlay, COMPASS completes all blocks, including the literals block. Block structuring 
starts fresh with each overlay. This means that each overlay can use the same block names used by other 
overlays, and each overlay can contain a literals block. The USE table and control counters are all 
reinitialized. The origin specified for an IDENT-type overlay can be any place in a previously generated 
overlay. This is possible because IDENT causes the assembler to assign an absolute address to each symbol 
in the symbol table. It can do this because the sizes of all the blocks are known. 

Figure 3-4 illustrates a CPU program in which a second IDENT is used prior to an END pseudo instruction 
to generate a main overlay and a primary overlay. Between the two IDENT instructions, block usage 
alternates between the absolute block (labeled PROGRAM* on the listing) and block A, as depicted in the 
block structure diagram. Note that in the main overlay (the first section of binary generated, labeled 
MAIN), the assembler has concatenated the portions of each block. Concatenation also occurs in the 
primary overlay, OV1, for the portions of the absolute block ABSOLUTE' and for those of blocks A', B, 
and C. 

The occurrence of literals and default symbols causes the assembler to generate a zero block and a literals 
block, respectively, in both of these overlays. Following the second nonblank IDENT, the program overlay 
origin is set back into block A, as shown in the map of the two loaded overlays. Note that the loader 
control table is loaded in memory below the address specified in the ORG pseudo instruction (BETA, in the 
figure), as shown in the map of the loaded overlays. 

The first IDENT pseudo instruction assigns the level number 0,0 to the first overlay (MAIN). COMPASS 
assigns level number 1,0 to overlay OV1 by default. 

SEGMENT-Type Overlays 

A SEGMENT-type overlay consists of the portions of a program from: 

• The IDENT that identifies the program to a SEGMENT pseudo instruction 

• One SEGMENT to the next SEGMENT 

• The last SEGMENT to the END pseudo instruction 
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SEGMENT provides the programmer with the option of specifying the overlay level numbers with each 
overlay. The assignment of unique level numbers enables the loader to locate a specified overlay among 
overlays written on the same file. If the programmer does not specify level numbers for a CPU assembly, 
COMPASS assigns numbers 0,0 to the first overlay, and numbers 1,0 to all subsequent overlays. 

Upon encountering a SEGMENT instruction, COMPASS generates output consisting of a memory image of 
the overlay starting with the overlay origin specified on the previous SEGMENT (or IDENT, for the first 
overlay), and ending with the current origin counter value of the block in use at the time the SEGMENT 
was encountered. Following this, COMPASS writes an end-of-section and overlay identification ' 

information for the overlay to follow. 

SEGMENT does not clear the symbol table or reinitialize the USE table. Thus, when a SEGMENT is 
encountered, the block in use is incomplete. It is the responsibility of the user to assure that all blocks 
other than the one in use are complete at that time. Also, the only symbols that can be used to define the 
origin of the new overlay are those valid for the block in use. 

Each new SEGMENT-created overlay must use unique block names because blocks established in previous 
overlays cannot be resumed and because the block names remain in the USE table due to the 
incompleteness of the block group. 

Figure 3-5 illustrates a program consisting of a main overlay, MAIN, and a primary, OV1. The use of 
default symbols causes generation of a zero block. The use of literals causes generation of a literals 
block. Both of these blocks occur in the overlay MAIN, because it contains the end of the absolute block. 
Block A begins in the main overlay, but is incomplete when COMPASS encounters the SEGMENT. The 
ORG pseudo instruction causes the origin of the primary overlay OV1, to be set at load time to TAG, at a 
lower address in block A. (Note that the loader control information is loaded at an address lower than the 
origin of the overlay.) O V1 establishes new blocks C and D. 


3.4.2 MULTIPLE ENTRY POINT OVERLAYS 

When a CPU program or overlay that calls an overlay is assembled independently of the overlay called, it 
may be desirable for the called overlay to identify more than one entry point. Thus, ENTRY pseudo 
instructions are permitted within an absolute assembly and cause the generation of a 5100g overlay 
table. This table consists of a control word and a list of overlay entry points. The calling program can 
examine the list and link to any of the entry points. The 5100g table occupies the area below the overlay 
origin and uses one more word than the number of entries in the table. For the format of the 51008 
table, refer to the Loader reference manual. 


3.4.3 PARTIAL BINARY 

When a CPU absolute program or overlay contains SEG pseudo instructions or IDENT pseudo instructions for 
which the parameters are omitted (blank), COMPASS writes a partial binary section consisting of the 
binary generated since the previous IDENT, SEGMENT, or SEG instruction. However, it does not write an 
end-of-section (or end-of-record) or a new prefix table. A SEGMENT, nonblank IDENT, or END instruction 
completes the binary section. 


SEG Partial Binary Record 

By writing partial binary records using SEG, the programmer can reduce the assembler storage 
requirements. SEG does not write a complete block group. When the SEG is encountered, COMPASS writes 
binary beginning with the first block established in that portion of binary and ending with the final count 
specified by the origin count for the current block. A fatal error is issued if the user attempts to store 
data into a block not in the current partial binary record. 

The portion of the binary that contains the end of the absolute block contains the literals block, if there is 
one. The symbol table and USE table are not reinitialized. 
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Figure 3-5. SEGMENT-Type Overlay Structure 
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I Figure 3-6 illustrates how the binary for an absolute program can be written in three separate tanary 
writes to reduce the amount of memory required to assemble the program. The resulting absolute section 
is loaded and executed as a single program or overlay. 


IDENT PROG- 


SEG 

(writes partial¬ 
binary) 

SEG 

(writes partial¬ 
binary) 


END- 


ABSOLUTE 


ABSOLUTE 


B 


Source Program 
Block Structure 


Largest partial assembly 
determines assembler 
storage requirements 


>:&Prefix Table 


^Loader Control:; 
:^Jtof<^matipn5i:;:i 


ABSOLUTE 


LITERALS 


B 


Binary Load 
Module 


Absolute Binary 
Section 


End-of-section 


I 


Figure 3-6. SEG Partial Binary 


IDENT Partial Binary 


An IDENT with a blank variable field causes all binary accumulated since the previous IDENT, SEG, or 
| SEGMENT to be written out without an end-of-section (or end-of-record) or a new 7700g prefix table. 

The USE table and the block counters are reinitialized. Each symbol in the symbol table is assigned an 
absolute address. The blocks in each partial binary section generated in this manner are allocated as if the 
partial binary section were a new subprogram with its own absolute block, literals block, and local blocks. 
This allows portions of a program to be self-contained units even though they are not overlays but are 
loaded as a single unit. The origin of an absolute block for new portion is the last word address plus one of 
the last block of the previous portion. 

The core image written by a blank IDENT starts with the origin of the absolute block and normally ends 
with the maximum origin counter value of the last block declared in the block group; that is, it normally 
ends with the last word address. If part of the block group has already been written by a SEG or 
SEGMENT, however, the end of the binary is specified by the value of the origin counter for the current 
block. 

COMPASS completes all blocks. The literals block is terminated. Block structuring starts fresh with each 
IDENT. Each new partial binary section created by a blank IDENT can use the same block names as are 
used by the other blank IDENT-created partial binary sections and non-blank IDENT-created overlays and 
each IDENT can contain a literals block but the blocks with the same names are independent of each other. 

An attempt to write into or to reset the origin counter to a location in a partial binary section written 
| separately causes an assembler range error. 
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Figure 3-7 illustrates how the binary for an overlay can be written in three discrete partial binary sections 
to reduce the amount of central memory required to assemble the program and divide the program into 
self-contained units. The resulting absolute section is loaded and executed as a single overlay. 
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Figure 3-7. IDENT Partial Binary Records 
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PSEUDO INSTRUCTIONS 


4 


4.1 INTRODUCTION TO PSEUDO INSTRUCTIONS 


The format of the COMPASS pseudo instruction is the same as that of the symbolic machine instruction; it 
includes the location field, the operation field, the variable field, and the comments field. The pseudo 
instruction differs from the symbolic machine instruction in that it is used to control the actions of the 
assembler at assembly time, rather than those of the machine at execution time. 


The pseudo instructions available in the COMPASS language are presented in this chapter and in 
chapters 5, 6, and 7. Programmers with little COMPASS experience should give special attention to a few 
important pseudo instructions, which are listed in the following table. It is not possible to write a 
COMPASS program without using some of them. The table indicates the type of assemblies in which the 
pseudo instructions can be used. 


Pseudo Instruction 

Section CPU Relocatable 

CPU Absolute 

PPU Abf 

IDENT 

4.2.1 

X 

X 

X 

ABS 

4.3.1 

- 

X 

- 

PPU or PERIPH 

4.3.3 or 4.3.4 

- 

- 

X 

ORG 

4.5.3 

X 

X 

X 

ENTRY 

4.7.1 

X 

- 

- 

BSS 

4.5.4 

X 

X 

X 

CON 

4.8.6 

X 

X 

X 

END 

4. 2.2 

X 

X 

X 


4.1.1 TYPES OF PSEUDO INSTRUCTIONS 

Pseudo instructions discussed in this chapter are classed according to application as follows: 

• Subprogram identification (IDENT and END) 

• Binary control (ABS, MACHINE, PERIPH, PPU, IDENT, SEGMENT, SEG, LCC, LDSET, STEXT, 
COMMENT, and NOLABEL) 

• Mode control (BASE, CHAR, CODE, COL, Bl=l, B7=l, and QUAL) 

• Block counter control (USE, USELCM, ORG, ORGC, BSS, LOC, and POS) 

• Symbol definition (EQU and =, SET, MAX, MIN, MICCNT, and SST) 

• Subprogram linkage (ENTRY, ENTRYC, and EXT) 

• Data generation (BSSZ and blank operation code, DATA, DIS, LIT, VFD, CON, R=, REP, REPC, and 
REPI) 

• Assembly control (ELSE, ENDIF, IFtype, IFop, IF, IFC, IFPL, IFMI, and SKIP) 

• Error control (ERR and ERRxx) 

• Listing control (LIST, EJECT, SPACE, TITLE, TTL, NOREF, CTEXT, ENDX, and XREF) 
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Later chapters describe pseudo instructions that involve definition operations, alterations to the operation 
code table, and micros. In general, pseudo instructions can be summarized according to where they can be 
placed in a subprogram. 


4.1.2 REQUIRED PSEUDO INSTRUCTIONS 

Two pseudo instructions, IDENT and END, are required for any assembly. IDENT must be the first source 
statement; END signals the termination of source statements for a subprogram. 


4.1.3 FIRST STATEMENT GROUP 

Certain pseudo instructions establish basic characteristics of the assembly and provide the assembler with 
I required information. These instructions make up the first statement group which must precede any 
symbol definition, storage allocation, or object code generation. The following instructions, if used, must 
be in the first statement group: 

ABS 

MACHINE 

PERIPH 

PPU 

STEXT 


4.1.4 PERMISSIBLE ANYWHERE INSTRUCTIONS 

The following pseudo instructions are permissible anywhere, including in the first statement group: 


BASE 

CPSYN 

ENDM 

MACROE 

OPDEF 

SKIP 

Bl=l 

DECMIC 

HERE 

MICCNT 

OPSYN 

SPACE 

B7=l 

EJECT 

IFC 

MICRO 

PPOP 

SST 

CHAR 

ELSE 

IRP 

NIL 

PURGDEF 

TITLE 

CODE 

END 

LDSET 

NOLABEL 

PURGMAC 

TTL 

COMMENT 

CPOP 

ENDD 

ENDIF 

LIST 

MACRO 

NOREF 

OCT'MIC 

QUAL 

RMT 

XREF 


Comment lines and references to macro definitions are also permitted anywhere. 

CPU or PPU symbolic machine instructions and all other pseudo instructions cannot be placed in the first 
statement group. The first use of one of these instructions terminates the first statement group. 


4.2 SUBPROGRAM IDENTIFICATION 

Subprogram identification pseudo instructions designate subprogram beginning and end. When two or more 
subprograms are assembled in a single COMPASS run called through the COMPASS control statement, the 
end of the source decks is indicated by an end-of-section, such as a 7/8/9 card. 


4.2.1 IDENT - SUBPROGRAM IDENTIFICATION 

An IDENT pseudo instruction of the following form is the first statement of a subprogram recognized by 
the assembler. Usually, any lines preceding the first IDENT or between an END and IDENT are assumed to 
be comments. However, when COMPASS has been called by some other language processor such as 
FORTRAN, the assembler returns control to the processor when the statement following END is not 
IDENT. For a relocatable subprogram, COMPASS flags any subsequent use of IDENT before END as an 
error. For an absolute subprogram, a second form of IDENT described under BINARY CONTROL is 
available for overlay generation. 
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The format of IDENT varies according to the type of assembly. 
CPU Relocatable Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IDENT 

name 


CPU Absolute Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IDENT 

name, origin, entry, £ ^, £ 2 


7600 PPU Absolute Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IDENT 

name, origin, entry, ppu 


6000 Series PPU Absolute Format: 


LOCATION 

OPERATION 

VARIABLE SU8FIELDS 


IDENT 

name, origin 


name Name of the subprogram or overlay. The parameter is required. For a CPU relocatable 

or absolute assembly, name can be 1 through 7 characters, of which the first must be 1 
alphabetic (A through Z) and the last must not be a colon. I 

For a CYBER 70/Model 7*6 or 7600 PPU assembly, name can be 1 through 7 characters. | 
For CYBER 170 Series or CYBER 70/Model 72, 73, 74 or 6000 Series PPU assembly, 
name can be 1 through 3 characters. In either case, there is no restriction on the first | 
character, but the last character must not be a colon. 

origin An expression specifying the first word address of the absolute program or overlay. The 

overlay loader table and all code assembled starting at this address and ending with the 
next SEGMENT, nonblank IDENT, or END instruction make up the overlay. For a single | 
entry point CPU program, the load address for the overlay is origin-1. The word at 
origin-1 is overlaid by the 5000g loader control table. For a multiple entry point CPU | 

program, the load address for the absolute overlay is origin-wc-1, where wc is the 
number of entry points in the 5100g loader table. | 

For a PPU subprogram, the load address is origin-5. Five 12-bit PPU words are overlaid 
by the 60-bit loader table. 

Data can be generated in locations starting with origin and above, but not below origin. 

The origin subfield does not serve the same funtion as ORG, nor does it replace ORG for 
setting the origin counter. 
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If the origin field is null for an absolute subprogram, the assembler uses address 
000000 RA(S) as the origin for a CPU program and 0000 as the origin for a PPU program. 

For a relocatable subprogram, the subfield is ignored. The loader automatically 
relocates the first subprogram to be loaded starting at RA(S)+100g, the second 
subprogram starting at the first available location following the first subprogram, and so 
forth. 

entry For a CYBER 70/Model 76 or 7600 PPU assembly or for an absolute CPU assembly, this 

subfield contains an expression specifying the subprogram entry address, which can be 
symbolic. 

Absolute expressions specifying the level numbers of the overlay. is the primary 
level (0 through 63) and I 2 is the secondary level (0-63). When the first IDENT 
identifies the main overlay, and I 2 can be omitted. If I* is omitted, it is set 
to 00. If 1% is omitted, it is set to 00. 

Because the first IDENT precedes any use of the BASE pseudo instruction, the level 
numbers on this IDENT are evaluated as decimal unless specifically designated as octal 
by a post radix. 

ppu Absolute expression specifying the number of the PPU on which this program is to be 

loaded. On the first IDENT, this number is evaluated as decimal unless specifically 
designated as octal. 

A location field symbol, if present, is ignored. 

If the COMPASS assembler is called from within a FORTRAN compilation rather than by a COMPASS 
control statement, IDENT must be in columns 11 through 15. 

When the subprogram does not include a TITLE instruction, COMPASS uses the IDENT variable field entry 
as the main subprogram title on the assembly listing. 

Example: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


CONTROL 

IDENT 

ADS 

ORG 

BSS 

END 

CT,CONTROL,CONTROL 

(ABSOLUTE CPU PROGRAM 

HOP 

0 DEFINES SYMBOL CONTROL 


Absolute CPU program CT will be loaded at origin address OOllOg. 

4 . 2.2 END-END OF SUBPROGRAM 

An END pseudo instruction must be the last instruction of each subprogram. It causes the assembler to 
terminate all counters, conditional assembly, macro generation, or code duplication. Before terminating 
assembly, COMPASS assembles any waiting remote text (see RMT). 
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For a relocatable subprogram, the assembler combines all local blocks into a relocatable subprogram 
block, generates the relocatable binary tables and produces the listing. 

For an absolute assembly, the assembler assigns each block an origin relative to absolute zero, 
combines all blocks into an absolute subprogram or overlay, generates the absolute binary section and 
produces the listing. 

END can also be used to signal the end of source statements from an external source (see XTEXT). In 
this case, it does not terminate the subprogram. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

END 

trasym 


sym Optional last word address symbol; if present, COMPASS defines it as the 

total subprogram length, including the literals block and all local blocks. 

The value is the last word address plus one. 

trasym A symbol specifying the entry point to which control transfers for a reloca¬ 

table subprogram. This symbol must be declared as an entry point in a 
subprogram — not necessarily the subprogram being assembled. At least 
one subprogram must specify a transfer address or the loader signals an 
error. If more than one subprogram indicates a transfer address, the loader 
uses the last one encountered. 

For an absolute assembly, trasym is ignored. 

Example: 



4-5 


60492600A 





4.3 BINARY CONTROL 


Pseudo instructions that allow the user extensive control of binary output produced by the assembler 
are summarized below and described fully in this section. 


ABS 

MACHINE 

PPU 

PERIPH 

IDENT 

SEGMENT 

SEG 

STEXT 

COMMENT 

NOLABEL 

LCC 

LDSET 


Specifies CPU absolute binary output 
Specifies processor type 

Specifies CYBER 70/Model 76 or 7600 PPU binary output 

Specifies CYBER 170 Series, CYBER 70/Model 71, 72, 73, 74, or 6000 
Series PPU binary output 

Begins absolute overlay or writes partial binary section 

Begins absolute overlay 

Writes partial binary section 

Generates system text overlay 

Inserts comments into the 77 prefix table 

O 

Suppresses header information on binary output 

Passes loader control information to the relocatable loader 

Generates loader directive LDSET 


4.3.1 ABS-ABSOLUTE CPU PROGRAM 

An ABS instruction declares a CPU program to be absolute. If used, it must be in the first statement 
group. 

The following instructions are illegal in an absolute program: 

EXT 
LCC 
REP 
RE PC 
REPI 

A symbol can be prefixed by =X if it is also defined conventionally; in this case, the =X has no signifi¬ 
cance because a conventional definition takes precedence (Section 2.4.2). 

Format: 


lOCATtON 

OPERATION 

VARIABLE SUMIELDS 


ABS 



Symbols in file location and variable fields, if present, are ignored. If a program c ontains both ABS 
and PERIPH (or PPU), the PERIPH (or PPU) instruction takes precedence. 
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Example: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

I 


1! 

18 

1 30 



T0ENT 

CT,CONTROL 

, CONTROL 



ABS 

• 

• 

jABSOLUTE CPU PROGRAM 



• 

ORG 

• 

lion 

I 

j 


CONTROL 

RSS 

0 

DEFINES SYMBOL CONTROL 



• 

• 

1 



• 

• 




• 

• 

I 



FNO 


1 


4.3.2 MACHINE - DECLARE OBJECT PROCESSOR TYPE 

The MACHINE pseudo instruction specifies the type of computer system on which the object pregram 
can be executed successfully and optionally specifies hardware features needed by the object program. 
If used, MACHINE must be in the first statement group. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


MACHINE 

type,hf 1 ,hf 2 ,hf 3 .hf n 


A location field symbol, if present, is ignored. 

type Character string designating object processor type. The subfield can be any length 

and may contain any characters other than blank or comma. The first character 
identifies processor type, as follows: 

6 The object program is restricted to the following computer systems: CYBER 
170 Series, CYBER 70/Model 71, 72, 73, or 74, or 6000 Series. All machine 
instructions unique to the CYBER 70/Model 76 or 7600 Computer Systems are 
undefined. 

7 The object program is restricted to a CYBER 70/Model 76 Computer System or 
to a 7600 Computer System. With the exception of the PS instruction (often used 
for subroutine entry points in CPU assemblies), all instructions unique to the 
following computer systems are undefined: CYBER 170 Series, CYBER 70/ 
Models 71, 72, 73, and 74, and 6000 Series. 

In a CPU assembly, if the MACHINE pseudo instruction is omitted, or the type 
subfield is blank, or its first character is not 6 or 7, then all CPU instructions 
are defined, and the target and valid fields of the PRFX table in the object pro¬ 
gram are blanks. If the type subfield is present and its first character is 6 or 7, 
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the valid field contains 6X or 7X. If the type subfield is at least two characters, 
the first character is 6 or 7, and the second character is a digit (0-9), the target 
field contains those two characters. 

In a PPU assembly, if the MACHINE pseudo instruction is omitted, or the type 
subfield is blank, or its first character is not 6, or 7, then: if the PERIPH 
pseudo instruction is present, MACHINE 6 is assumed; if the PPU pseudo in¬ 
struction is present, MACHINE 7 is assumed. The target field of the PRFX 
table contains blanks, and the valid field contains 6P or 7P. 

hf. Optional subfield, a character string designating an optional hardware feature re¬ 

quired for successful execution of the object program. The subfield may be any 
length and may contain any characters other than blank or comma. It has no effect on 
assembly of the program. The first character of the subfield is placed in the hard¬ 
ware-instruction-dependencies field in the PRFX table in the object program. 

Recommended mnemonic letters are: 

C Compare/Move Unit 

D Distributive Data Path 

I Integer Multiply Instruction 

L ECS/LCM 

R Interlock Register 

X Central and Monitor Exchange Jumps 

Up to nine hf. subfields are processed; any additional subfields are ignored. If the 
hf. subfields are omitted, the comma following type can also be omitted. 

Example: 



LOCATION 

OPERATION 

VARIAilE COMMENTS 

2, 


11 

11 130 



MACHINE 

6»CMU#LC WfXJ 

t 


4.3.3 PPU - CYBER 70/MODEL 76 OR 7600 PPU PROGRAM 

A PPU instruction declares a program to be a CYBER 70/Model 76 or 7600 absolute PPU program rather 
than a CPU program. If used, PPU must be in the first statement group. For a description of binary 
format generated as a result of this instruction, refer to the Loader reference manual. 
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Floating point constants and the following instructions are illegal in a PPU assembly: 


ENTRY 

SEGMENT 

ENTRYC 

USELCM 

EXT 

R= 

LCC 

Bl=l 

REP 

B7=l 

REPC 


REPI 


SEG 



A symbol can be prefixed by = X if it is also defined conventionally. 

If the program contains both a PPU and a PERIPH pseudo instruction, the PPU takes precedence. 

PPU programs permit symbols of the form used for CPU register designators; they are normal symbols 
having no special significance. The following instructions are legal but are not applicable in a PPU 
assembly: 

OPDEF 

CPOP 

CPSYN 

PURGDEF 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


PPU 

j 


J A character string beginning with J supplied in the variable field alters the way 

that COMPASS assembles the variable expression on UJN, ZJN, NJN, MJN, or 
PJN instructions. 

If J is not specified, COMPASS first tests the range of the expression against 
the short jump limit (+31). If the value is in range, COMPASS assembles the 
jump using the value of the expression. If the value is out of range, COMPASS 
performs a second test, this time using the expression value minus the 
location counter value. If the value is now in range, COMPASS assembles the 
instruction using the expression value minus the location counter value. 
However, if it is out of range, a fatal error is flagged. 

Selection of the J option causes COMPASS to always subtract the value of the 
location counter from the value of the expression. 

As a result, COMPASS is able to differentiate between an expression value 
that is an absolute address in the short jump range from an expression value 
that is a true relative address. 

A symbol in the location field, if present, is ignored. 
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Example: 


Location 

Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


n 

18 

1 30 





PPU 

« 


-1--- 

1 

74 0 

760 

0 367 


tag 

• 

PSP 

UJM 

209 

TAG-* 

1 

1 

|EXPRESSION < 779 

1 


l 


Location 

Code Generated 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 




l 


11 

18 

1 30 






ppij 

« 

JUMP 

-1-- 

1 

740 

76 0 

0 -7C 



TAG 

• 

PSS 

20 P 

1 

1 






UJN 

TAG 

1 EXPRESS!ON-* < 379 


4.3.4 PERIPH - CYBER 170 SERIES OR CYBER 70/MODELS 72, 73, 

74 OR 6000 SERIES PPU PROGRAM 

A PERIPH instruction declares a program to be a CYBER 170 Series or CYBER 70/Model 72, 73, 74, 
or 6000 Series absolute PPU program rather than a CPU program. If used, PERIPH must be in the 
first statement group. For a description of binary output produced as a result of this instruction, 
refer to the Loader Reference Manual. 

Floating point constants and the following instructions are illegal in a PPU assembly: 

ENTRY LCC REPI R= 

ENTRYC REP SEG Bl=l 

EXT REPC USELCM B7=l 

A symbol can be prefixed by =X if it is also defined conventionally. 


PPU programs permit symbols of the form used for CPU register designators; they are normal 
symbols having no special significance. The following instructions are legal but are not applicable 
to PPU assemblies: 

OPDEF 

CPOP 

CPSYN 

PURGDEF 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIEIDS 


PERIPH 

J 


J A character string beginning with J supplied in the variable field alters the 

way that COMPASS assembles the variable field expression on UJN, ZJN, 
MJN, or PJN instructions. 
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If J is not specified, COMPASS first tests the range of the expression value 
against the short jump limit (+31). If the value is in range, COMPASS assembles 
the jump using the value of the expression. If the value is out of range, COMPASS 
performs a second test, this time using the expression value minus the location 
counter value. If the value is now in range, COMPASS assembles the instruction 
using the expression value minus the location counter value. However, if it is out 
of range, a fatal error is flagged. 

Selection of the J option causes COMPASS to always subtract the value of the 
location counter from the value of the expression. 

For an example illustrating how to use J, see the PPU pseudo instruction. 

A symbol in the location field, if present, is ignored. 


4.3.5 IDENT - IDENTIFY AND GENERATE OVERLAY 

Two or more IDENT pseudo instructions are permitted in CPU absolute or PPU assemblies. Second 
and subsequent IDENT instructions having nonblank variable fields cause generation of overlays. IDENT 
differs from SEGMENT in the way it generates overlays. First, it allows the specification of overlay 
numbers. Second, the USE table and all block counters are reinitialized. The symbol table is not 
cleared; all symbols are reassigned absolute addresses relative to absolute zero. Thus, an ORG to a 
previously defined symbol restarts the absolute block at the symbolic address. The third difference is 
that normally the end of the overlay is determined by the last word address, the maximum origin 
counter value of the last block established in the overlay. A preceding SEG or SEGMENT can alter 
this, however (Section 3.4). 

For a CPU assembly, an IDENT with a blank variable field causes a partial binary write. The 
output is not terminated by an end-of-section or a new 77 g table. However, the USE table and the 
block counters are reinitialized and each symbol in the symbol table is assigned an absolute address. 

Following an IDENT, COMPASS assumes that all blocks, including the literals block are complete. 

Block structuring starts fresh with the new overlay or portion of binary. Thus, each new overlay or 
partial can use the same block names as are used by other overlays or partial and each can have a 
literals block. 

For a blank IDENT, an attempt to write into or reset the origin counter to a location in a partial section 
written separately causes a range error. Following the IDENT, the origin of the new absolute block 
is the next word after the binary written out, that is, it is lwa+1. 

The format of the IDENT varies according to the type of assembly as follows: 

CPU Absolute Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IDENT 

name, origin, entry, j^£ 2 
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or 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IDENT 



7600 PPU Absolute Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IDENT 

name, origin, entry, ppu 


6000 Series PPU Absolute Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IDENT 

name, origin 


name Name of the overlay. For a CPU program, 1-7 characters, the first of which 

must be alphabetic (A-Z); for CYBER 170 Series or a CYBER 70/Model 72, 73, 
or 74 or a 6000 Series PPU program, 1-3 characters; for a CYBER 70/Model 76 
or 7600 PPU program, 1-7 characters. In all cases, the last character must 
not be a colon. A name is a loader linkage symbol required for overlays. 


origin An expression specifying the first word address of the overlay. The overlay 

control word and all code assembled starting with this address and ending with 
the next SEGMENT, nonblank IDENT, or END instruction comprises the overlay. 
For a single entry point CPU program, the load address for the overlay is 
origin-1. The word at origin-1 is overlayed by the 50 g loader table. For a 
multiple entry point CPU program, the load address for the overlay is origin- 
wc-1, where wc is the number of entry points listed in the 51 g loader table. 


For a PPU subprogram, the load address is origin-5. Five 12-bit PPU words 
are overlayed by the 60-bit loader control table. Data can be generated in 
locations starting with origin and above, but not below origin. The origin 
subfield does not serve the same function as ORG nor does it replace ORG for 
setting the origin counter. The origin of an overlay can be below the origin 
specified on any other IDENT or SEGMENT. 

entry An expression specifying the overlay entry address. When the overlay is 

called, control optionally transfers to this address. 


J^>f 2 Absolute expressions specifying the level numbers of the overlay for CPU 

programs only, fj is the primary level (00-77 g ), f 2 is the secondary level 
(00-77 g ). if base is M, and fg are assumed to be octal. If fj and f 2 are not 
specified, f^ is set to 01 and f 2 I s set to 00. 
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PP U An absolute expression specifying the number of the PPU in which the overlay 

is to be loaded. If base is M, ppu is assumed to be octal. 

A location field symbol, if present, is ignored. 

The binary is written on the file specified by the B parameter on the COMPASS control statement. END 
dumps the last overlay or completes a partially written section. 

Examples: 

The following program uses IDENT for overlay creation. Symbols T.OVL, O.DMP1, etc. are 
defined on a system text overlay. 


0«»M 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


1! 

18 ) 30 



IOENT 

DMP.l.T.OVL.O.OMPl 





ABS 

1 





BASE 

M | 





00NMEN1 

10/07/70.CONTROL CARO 

CALL.DMP. 




LIST 

G 1 





SST 

| 

OVERLAY 



ORG 

T.OVL 1 

DMP1 




OUAL 

0MP1 1 




DMP 

SXQ 

! l i 





• 

• 1 





• 

. 1 





QUAL 

DMP? j 

J 




IDENT 

OliP?*T .OVL .C .DHP2 

" 




ORG 

T.OVL i 

OVERLAYS ON 


JPW2 

SXO 

• 

B6 + 1 

• 

THROUGH 0HP 

1 



• 

QUAL 

• 1 

• 

DMP9 1 





IDENT 

OMP.R,T.OVL,0.DMP9 

OVERLAY 



ORG 

T.OVL j 

DMP9 




SXO 

• 

0. 0MP2+F .MOE| 





• 

• 

ENO 

1 

(end overlay 

DMP9 
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The following program uses IDENT instructions having blank variable fields 


1617 


*45«j 


7116 


Origin—* 

1617 

3455 —* 

7116 —* 

lwa —*■ 


LOCATION 


OPERATION 


VARIABLE 


COMMENTS 


II 


130 


fMT 


IDENT 
ARS 
Of ?C, 
FXO 


LIT 


TRENT 


LTT 


I0FNT 


WV, 11 OB, ENT 

110R 

1 




LIT 


FMR 


?»3 


1»2 


First 

Partial Binary 


J 

1 


Second 

Partial Binary 


Third 

Partial Binary 


J 


ABSOLUTE 


LITERALS 


Local Blocks 


ABSOLUTE' 


LITERALS' 


ABSOLUTE" 


LITERALS' 


Local Blocks 


Core Map 


First 

Partial Binary 


T 

Second 

Partial Binary 

J 


Third 

Partial Binary 

J 
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4.3.6 SEGMENT - GENERATE BINARY SEGMENT 


The SEGMENT pseudo instruction produces overlays at assembly time. It has many of the features of 
IDENT and is included primarily to provide another way of handling literals. Use of SEGMENT is 
intended for 6000 Series CPU absolute or PPU assemblies. For a relocatable subprogram, a SEG¬ 
MENT pseudo instruction causes BSSZ code and the FILL, REPL, and LINK relocatable tables to be 
written on the binary output file. 

The first SEGMENT causes all binary accumulated since the IDENT to be dumped as the main (0, 0) 
overlay. Each subsequent SEGMENT generates a new overlay with the specified level numbers. END 
dumps the last overlay. When COMPASS encounters a SEGMENT pseudo instruction, it does not clear the 
symbol table or block declarations. All blocks other than the block in use must be complete. For a 
CPU assembly, the literals block must be in one overlay only but that overlay can be any overlay. 


Format: 


LOCATION 

OPERATION 

VARIABLE SUBE1ELDS 

name 

SEGMENT 

origin, entry, 


Name of overlay. For a CPU program, 1-7 characters, first of which must be 
alphabetic (A-Z); for a PPU subprogram, 1-3 characters. In all cases, the last 
character must not be a colon. It is a required loader linkage symbol. 


origin A relocatable expression specifying the first word address of the overlay. 

It can only be an address in the block in use. The overlay loader table and all 
code assembled starting at this address and ending with the next SEGMENT, 
nonblank IDENT, or END instruction comprises the overlay. 

For a CPU program the load address for the record is origin-1. The word at 
origin-1 is overlayed by the 50g loader table. 

For a PPU subprogram, the load address is origin-5. Five 12-bit PPU words 
are overlayed by the 60-bit loader table. Data can be generated in locations 
starting with origin and above, but not below origin. The origin subfield does 
not serve the same function as ORG nor does it replace ORG for setting the 
origin counter. The origin of an overlay can be below the origin specified on 
any other IDENT or SEGMENT. 

entry An expression specifying the overlay entry address. It is used for CPU 

assemblies only. When the overlay is called, control optionally transfers to 
this address. 

I r £ Absolute expressions specifying the level numbers of the overlay for CPU 

^ programs only. £^ is the primary level (00-77g), Jis the secondary level 

(00-77 ). If base is M, £ and £ are assumed to be octal. If £ and £ 

O X Ct X Ci 

are not specified, £ is set to 01 and £ is set to 00. 

1 ci 
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Example: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 


130 







IDENT 

APS 

SAM,FNTA 

1 



ORG 

non 

l 


FNTA 

PSS 


ENTRY POINT 



• 

• 




• 

• 

I 



• 

• 



ovloc 

dss 


| OVERLAY LOAD POINT 



• 

• 





• 

| 



• 

• 



SEG1 

SFGMEN 

STRT.ENTB 

| 



nRG 

OVLOC 

1 



PSS 

1 

LOADER TAPLE 


STRT 

PSS 

a 

(FIRST WORD OF OVERLAY 



• 

« 

1 



• 

• 




• 

• 

1 


ENTO 

PSS 

n 

EXECUTION BEGINS HERE 



• 

• 

| 



• 

• 

1 



• 

• 




FN0 

; 


(END OF OVERLAY 


SEG1 is loaded as an overlay upon a call for the loader from the program. The first word of the overlay 
is loaded at OVLOC +1, following the loader table. The entry point to the overlay and the first executable 
instruction is at ENTB. The overlay, when executed occupies the area of the main program beginning 
at OVLOC. 


4.3.7 SEG - WRITE PARTIAL BINARY 

The SEG pseudo instruction permits the generation of a CPU absolute subprogram or overlay in less core 
than would otherwise be required for assembly. It is illegal in PPU and relocatable assemblies. 

SEG causes COMPASS to write on the binary output file all binary information accumulated since the 
previous IDENT, SEGMENT, or SEG pseudo instruction. It does not write an end-of-section or begin 
a new PRFX table. A SEGMENT, IDENT, or END instruction completes the binary section. 

SEG does not affect the location and origin counters. The user cannot resume use of a block established 
prior to the SEG, except for the block in use when the SEG was encountered. An attempt to reset the 
origin counter so as to resume a block already written out causes an R error. Also, since the block 
group is incomplete and the names of the blocks already written out are still in the USE table, no new 
blocks can be established using the same block names as were used prior to the SEG. 

The literals block is written in the portion that contains the end of the absolute block. 
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Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


SEG 



Symbols in the location field and variable field, if present, are ignored. 


Example: 



LOCATION 

OPEtATION 

VARIABLE COMMENTS 

1 


11 

18 1)0 




1 _ _ 



IOENT 

NAME»ORIGIN^ entry 



ASS 




USE 

A 



• 

• 



• 

• I 



• 

• 1 



SEG 

1 * 



USE 

* 1 



• 

• 1 



• 

• 



• 

• 1 



SEG 

1 



• 

• ' 



• 

• 1 



• 

• 1 



END 

1 


4.3.8 STEXT - GENERATE SYSTEM TEXT RECORD 

As a result of an STEXT pseudo instruction, binary output for the subprogram consists of all symbols, 
micros, and opcodes (macros, opdefs, and machine and pseudo instructions), written in overlay 
format at the end of pass one. The STEXT instruction must be in the first statement group. 

The system text overlay becomes available in other assemblies through use of the G or S option on the 
COMPASS control statement (chapter 10). Through this feature, information in the system text overlay 
need be processed only once for all COMPASS programs using the same system text. System text over¬ 
lays cannot be generated and used in the same assembly batch; system text overlays generated by one 
COMPASS control statement call can be used only by assemblies performed by later COMPASS control 
statement calls. 

The symbols included in the system text overlay written are all symbols defined in the assembly except 
those for which at least one of the following is true: 

The symbol value is relocatable or external. 

The symbol is qualified. 
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The symbol is redefinable (i. e., defined by SET, MAX, MIN, or MICCNT). 

The symbol is defined by statements read by XTEXT or occurring between CTEXT and ENDX. 

The symbol is defined by SST (i. e., is a system symbol input to the present system text assembly). 
The symbol is 8 characters beginning with t \. 

All defined micros are included in the system text overlay. 

All program-defined opcodes are also included. Machine and pseudo instructions automatically 
defined by COMPASS, and opcodes defined by system text input (if any) to the assembly, are not 
included. 

When a system text overlay is used as input to an assembly through the G or S option on a COMPASS con¬ 
trol statement, all of the micros and opcodes in the system text are automatically defined at the start of 
each assembly; however, the symbols in the system text are defined only for those assemblies that 
contain the SST pseudo instruction. 


A system text overlay on the library is an absolute overlay that has the following control table: 
59 48 42 36 00 


5000 

01 

01 

000000000000 


Format of Text: 



System Symbol 
Table 

2 words per entry 


Micro Definitions 


Macro/opdef Definitions 


Operation Table 

Entries (2 words per entry) 
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Format: 


LOCATION. 

OPERATION 

VARIA8LE SUBFIELDS 

rname 

STEXT 



rname Name assigned to overlay; 1-7 alphanumeric characters, of which the first must be a 
letter (A-Z) and the last must not be a colon. It is placed in the prefix table that 
precedes the overlay. 

If rname is blank, COMPASS uses the name from the IDENT instruction and generates 
the system text only. Otherwise, the system text is generated in addition to the re¬ 
locatable or absolute binary and precedes the binary output on the binary file. 

An entry in the variable field, if present, is ignored. 

Example: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


M 

18 130 



IOENT 

SYSTEXT | 




STEXT 

| 




8ASE 

MIXEO 



MPRS 

EQU 

100 1 “ 

1 


• 

• 

• 1 

1 




SYSTEM CONSTANTS, SYMBOLS, 




|AND COMMUNICATIONS AREAS 


• 

• 

* 1 



• 

• 

. 1 



TRTS 

EQU 

7777 1 - 



IXX/X 

OPOEF 

I»J,K | 



• 

• 

• 1 



• 

• 

. 'SYSTEM-DEFINED MACROS 


• 

• 

. 'AND OPDEFS 



ENOM 

| 



SYSCOM 

MACRO 

N i 



• 

• 

. 1 



• 

• 

. 1 



• 

• 

. I_ 




ENOM 

I "1 



DATE 

MICRO 

1,10,*...* 1 



• 

• 

• i 



• 

• 

. SYSTEM-DEFINED MICROS 


• 

• 

*■ . 




END 
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4.3.9 COMMENT—PREFIX TABLE COMMENT 


The COMMENT pseudo instruction inserts the character string specified in the variable field into 
the eighth through fourteenth words of the PRFX table in the object program. The prefix table, and 
thus the comment, is ignored by the loader but identifies the section. If a subprogram contains more 
than one COMMENT instruction, the new comments are appended to the table for the most recent 
binary control statement. If the subprogram contains a NOLABEL instruction, the COMMENT instruc¬ 
tion is meaningless. COMMENT instructions following SEG and blank IDENT pseudo instructions are 
ignored without notification. 


Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


COMMENT 

string 


string COMPASS searches the columns following the blank that terminates the operation 
field. If it does not find a nonblank character before the default comments column 
(see COL pseudo instruction), it takes the characters starting with the default 
comments column minus one. Otherwise, the character string begins with the first 
nonblank character following the operation field. In either case, the last character 
of the string is the last nonblank character of the statement. 1 to 10 blanks are 
appended on the right so that the string is followed by at least one blank and the 
length of the string is a multiple of 10 characters. If the variable and comment fields 
are all blanks, the string consists of 10 blanks. If the string length is more than 70 
characters, all characters beyond the 70th are lost. 

A location field symbol, if present, is ignored. Refer to section 4.3.5 for an example. 


4.3.10 NOLABEL - DELETE HEADER TABLE 

The NOLABEL instruction modifies the format of the binary output produced by COMPASS for an 
absolute assembly by optionally suppressing header information. It is particularly convenient for 
generating deadstart programs which must be loaded at location zero. 


Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


NOLABEL 

i 
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I Optional; if the variable field contains a character string beginning with an I, 

COMPASS suppresses all prefix (7700g) tables, but retains the other program 
header tables. 

If the I option is omitted, COMPASS suppresses all of the following: 

Prefix tables (7700g) 

Overlay control tables (5000g) 

Multiple entry point tables (5100g) 

PPU header control tables 


A location field symbol, if present, is ignored,. NOLABEL is illegal in a relocatable CPU assembly. 


4.3.11 LCC—LOADER DIRECTIVE 

The LCC pseudo instruction provides a means of including loader directives with the tables for a 
relocatable program. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELOS 


LCC 

directive 


directive First nonblank character following LCC to the first blank. For directive 

formats, refer to the Loader Reference Manual. 

A location field symbol, if present, is ignored. 

COMPASS writes a directive as a section in packed display code for subsequent interpretation by the 
loader. COMPASS does not edit the directive; the loader recognizes illegal forms at load time. 


4.3.12 LDSET—GENERATE LDSET OBJECT DIRECTIVES 

The LDSET pseudo instruction generates loader LDSET directives for a relocatable program. A 
program may contain any number of LDSET instructions. COMPASS collects all LDSET options and 
writes a single LDSET (7000g) table in the relocatable binary output between the PRFX (7700g) 
table and the PIDL (3400g) tables. The LDSET table is not written if LDSET instructions do not 
appear in the program. LDSET is not allowed in a PPU or absolute CPU assembly. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELOS 


LDSET 

options 
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options One or more options separated by commas. 


LIB 


LIB=libname 

I 


MAP 

MAP=p 


MAP=p/lfn 

MAP=/lfn 


PS=p 

PD=p 



PRESET=p 


Clear local library set. 

Add the specified libraries to the local library set. More than one library can 
be specified by separating library names with a slash, in the forms 

libnamej/libname 2 /.../libname n 

Write load map to file OUTPUT. 

Write load map to file OUTPUT. Map items are selected by p: 

N No map. 

5 Statistics. 

B Block list. 

E Entry point list. 

X Cross reference map. 

p can be written as N or as any combination of SBEX in any order. 

Write load map to file named lfn. p is as above. 

Write load map to file named lfn. Installation default determines items on 
the map. 

Select page size for load map by a specification of number of lines, p can be 
decimal 10 through 999999. A value outside this range results in the 
installation default page size. 

Select print density for load map by a specification of decimal number of 
lines per inch, p can be; 

6 6 lines per inch. 

8 8 lines per inch, 

other Installation default. 

Preset memory to the value specified by p. Under NOS/BE, p can be a 1 
through 20 digit octal number with an optional + or - prefix and an optional B 
suffix. 


p can also be one of the following key words: 

NONE No presetting for ECS; same as ZERO for CM 


ZERO 

0000 

0000 

0000 

0000 

0000 

ONES 

7777 

7777 

7777 

7777 

7777 

INDEF 

1777 

0000 

0000 

0000 

0000 

INF 

3777 

0000 

0000 

0000 

0000 

NGINDEF 

6000 

0000 

0000 

0000 

0000 

NGINF 

4000 

0000 

0000 

0000 

0000 

ALTZERO 

2525 

2525 

2525 

2525 

2525 

ALTONES 

5252 

5252 

5252 

5252 

5252 

DEBUG 

6000 

0000 

0004 

0040 

0000 


PRESETA=p p can be as defined for PRESET. The lower 17 bits (CM/SCM) or lower 24 

bits (ECS/LCM) of each word contains its address. This option is not 
supported by SCOPE 2. 


ERR=ALL 


Select loader abort for all errors. 
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ERR=FATAL Select loader abort only for fatal errors. 

ERR=NONE Select loader abort only for catastrophic fatal errors. 

REWIND Reset the default REWIND/NOREWIN option for load files to REWIND. The 

NR parameter on LOAD and SLOAD directives can override this default for 
individual files. 

NOREWIN Reset the default REWIND/NOREWIN option for load files to NOREWIN. The 

R parameter on LOAD and SLOAD directives can override this default for 
individual files. 

EPT=eptname If the symbol eptname is defined, declare it an entry point of the CAPSULE 

or OVCAP binary subsequently generated by the loader in the form: 

pnamei/pname 2 /.../pname n 

NOEPT=eptname Do not define eptname as an entry point of the CAPSULE or OVCAP binary 

subsequently generated by the loader. 

USEP=pname Cause the designated object modules to be loaded whether or not they are 

needed to satisfy external references. More than one module can be 
specified by separating module names by a slash. 

USE=eptname Cause the load of object modules containing the specified entry points 

whether or not they are needed to satisfy external references. More than one 
entry point can be specified by separating entry point names by a slash in the 
form: 

eptnamej/eptname 2 /.../eptname n 

COMMON Assign all labeled blocks to a segment such that the blocks are available to 

all segments that reference them. Valid for segment loads only. 

COMMON=blkname Assign the labeled common block named blkname to a segment such that it is 

available to all segments that reference it. Valid for segment loads only. 
More than one block name can be specified by separating the individual block 
names with a slash in the form: 

blkname]/blkname 2 /.../blkname n 

SUBST=pair Treat external references to eptname^ as though they were references to 

eptname 2 , where the entry point names are specified as a pair in the form: 

eptnam e ^-eptnam e 2 

More than one pair of entry point names can be specified by separating the 
pairs with a slash in the form: 

pair]/pair 2 /.../pair n 

OMIT=eptname Omit satisfying external references to the specified externals. More than 

one entry point name can be specified by separating the names with a slash in 
the form: 

eptnamej/eptname 2 /.../eptname n 

A location field symbol, if present, is ignored. 

See the Loader reference manual for details of these parameters, including the operating system to which a 
given option applies. 
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4.4 MODE CONTROL 


Mode control pseudo instructions influence the basic operating characteristics of the assembler. 
Specifically, the instructions’allow the programmer to alter the way in which the assembler: 


Interprets binary data 
Generates character data 

Interprets the beginning of comments on statements 
Qualifies symbols or does not qualify them 
Interprets the R= instruction 


BASE pseudo instruction 
CODE pseudo instruction 
COL pseudo instruction 
QUAL pseudo instruction 
Bl=l or B7=l pseudo instruction 


In each case, the assembler has a default mode which it uses if one of these instructions is never used. 


4.4.1 BASE - DECLARE NUMERIC DATA MODE 

The BASE pseudo instruction declares the mode of interpretation for numeric data for which a base 
radix is not explicitly defined. Use of the BASE pseudo is optional; if BASE is not used in a subpro¬ 
gram, COMPASS evaluates unspecified numeric data as decimal. 

An alternate application of BASE is to define the previous base as a micro. 

In addition, if no program or system micro named BASE has been defined, COMPASS changes the 
predefined BASE micro to be a single letter D, M, or O, corresponding to the new mode established 
by this BASE instruction. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

mname 

BASE 

mode 


mname Optional 1-8 character micro name by which the previous BASE mode can be referenced 
in subsequent BASE instructions. If mname is present, the value of the micro named 
mname is (re)defined to be a single letter D, M, or O, corresponding to the BASE mode 
in effect prior to this BASE instruction. 

mode Blank, in which case the base remains unchanged, or 1-8 characters, the 
first of which designates the new base as follows: 

O Octal assembly base; any subsequent use of a data item not 

specifically identified by an O, D, or B prefix or suffix is 
evaluated as octal. For example, the constants 15 and 15B 
are evaluated as 15g; constant 15D is evaluated as 17g. Any 
item containing an 8 or 9 without a D radix is flagged as 
erroneous. Exceptions are scale factors, character counts, 
shift counts (S modifier), and binary point positions, which 
are always considered decimal. 
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D 


Decimal assembly base; any subsequent use of a data item 
not specifically identified by an 0, D, or B prefix or suffix 
is evaluated as decimal. 


M Mixed assembly base; any subsequent use of a data item not 

specifically identified by an O, D, or B is evaluated as decimal 
if it is one of the following. Otherwise, it is evaluated as 
octal. 

VFD bit count 

IF, ELSE, or SKIP line count 

MICRO, OCTMIC, or DECMIC character count 

B, C, or I subfield in REP or RE PI 

DUP or ECHO line count 

Character count 

Shift counts (S modifier) 

Scale factors 
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Binary point position 
COL column number 
DIS word count 
SPACE line count 

* Use base in effect prior to current base. The assembler records 

occurrences of BASE pseudo instructions and maintains a table 
of the most recent 50 occurrences. Each BASE * resumes use 
of the most recent entry and removes it from the list. When the 
subprogram contains more BASE * instructions than there are 
entries in the stack, COMPASS uses a decimal base. 

other If the variable field is not blank and does not contain one of the 

above, COMPASS sets an error flag. 


Examples: 


This example illustrates the affect of BASE on a VFD instruction that defines a 48-bit field 
containing 10^. 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


n 

18 

I 30 

Dr»0 

OOOOOQOOOOOOOOIO 



BASE 

VFO 

0 

60/10 

-1- — 

1 




• 

• 

1 

0,»0 

0000 

000000000010 



BASE 

VFO 

• 

0 

40/8 

1 

1 




• 

• 


Di*M 

00000000 

00000010 



• 

BASE 

VFO 

• 

M 

48/10 

1 

1 

I 


The following example illustrates the micro capability of BASE: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

I 30 



SAVEB 

BASE 

M 

-J---- 

ISAVE BASE IN USE 



• 

• 

• 

1 



• 

• 

• 

.CODE USING BASE M 



• 

• 

• 

1 

Irestore saved base 




BASE 

*SAVE8* 




BASE 

0 RESTORE SAVED BASE 



• 

* 

• 

1 



• 

• 

• 

1 



• 

• 

• 

1 
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4.4.2 CHAR-DEFINE OTHER CHARACTER DATA CODE 


The CHAR pseudo instruction defines character data codes to be used when the CODE O (for Other) 
mode is in effect. 


Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


CHAR 

expl,exp2 


expl Evaluatable absolute expression whose value is 00 to 77s. The value of expl 

is the display code value of the character to be redefined. 

exp2 Evaluatable absolute expression whose value is 00 to 77s • The value of exp2 

is the new code other value of the character designated by expl. 

A location field symbol, if present, is ignored. 

Initially, all code other values are the same as display code. CHAR need be used only for those 
characters whose code other values are different from display code. Characters may be redefined 
as many times as desired by subsequent CHAR pseudo instructions. 

Example: 



LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

00r*63 

63*00 


CHAR 

CHAR 

0 »63B 
63B»0 

interchange 

PERCENT FOR 

COLON AND 
CODE OTHER 


4.4.3 CODE - DECLARE CHARACTER DATA CODE 

The CODE pseudo instruction declares that until the next CODE pseudo instruction is encountered all 
constants, character strings, and character data items are to be generated in the specified code. 
Character data can be generated in ASCII f, display, external BCD, or internal BCD, codes. If no 
CODE instruction is used, COMPASS generates display code. Codes are given in appendix A. 

An alternative application of CODE is to define the previous code as a micro. 

In addition, if no program or system micro named CODE has been defined, COMPASS changes the 
predefined CODE micro to be a single letter A, D, E, I, or O, corresponding to the new mode 
established by this CODE instruction. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

mname 

CODE 

char 


tAmerican Standard Code for Information Interchange. 
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mname Optional 1-8 character micro name by which the previous CODE mode can be referenced 
in subsequent CODE instructions. If mname is present, the value of the micro named 
mname is (re)defined to be a single letter A, D, E, I, or O, corresponding to the CODE 
mode in effect prior to this CODE instruction. 

char The first character of a string indicates the code conversion: 

A ASCn six-bit subset 

D Display 

E External BCD 

I Internal BCD 

O Other code, defined by CHAR pseudo instructions. 

* Use code in effect prior to current code. The assembler records occurrences of 

CODE pseudo instructions and maintains a table of the most recent 50 occurrences. 
Each CODE * resumes use of the most recent entry and removes it from the list. 
When the subprogram contains more CODE * instructions than there are entries in 
the stack, COMPASS generates display code. 

Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

I 30 

17252420252403COuCOO 



DATA 

OLOUTPUT 

i 

Di*A 



CO0E 

ASCII 


5765646u6564juUuJ30C 



DATA 

OLOUTPUT 

1 

A r»E 



CODE 

EXTERNAL 

BCD 

4624234724 2 3Ci0u0U0uQ 



DATA 

OLOUTPUT 

1 

EfI 



CODE 

INTERNAL 

BCD 

46646347646333003300 



DATA 

OLOUTPUT 

| 

1>D 



CODE 

DISPLAY 


172524202524d00udGuu 



DATA 

0,LOUTPUT 

1 

rvi 



CODE 

* 

t 

I 

4664634764 6 3 31) 0 3 - J 0 0 3 



DATA 

. 

CLO'JTPUT 

! 


4.4.4 QUAL - QUALIFY SYMBOLS 

The QUAL pseudo instruction signals the beginning of a sequence of code in which all symbols defined 
in it are either qualified or are unqualified (global). If no QUAL is in a subprogram, all symbols are 
defined as global. 

An alternative application of QUAL is to define the previous qualifier as a micro. 

In addition, if no program or system micro named QUAL has been defined, COMPASS changes the 
predefined QUAL micro to be the new qualifier name established by this QUAL instruction. 
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Within a QUAL sequence in which a symbol is defined, a symbol reference need not be qualified. 

Used outside the sequence, the symbol must be referenced as/qualifier/symbol. Thus, a symbol and 
a qualifier become a unique identifier local to the sequence in which the symbol was defined. The 
same symbol used with a different qualifier is local to a different QUAL sequence. If a symbol is 
defined with no qualifier as well as being defined as qualified, a reference to the symbol within the 
QUAL sequence is assumed to be a reference to the qualified symbol rather than to the global symbol. 
In this case, a reference to the global symbol must be written as // symbol. However, in a 
NOREF statement when the unqualified symbol is previously defined and the qualified symbol is not, 
COMPASS assumes the reference is to the unqualified symbol. 


Default symbols and linkage symbols are not qualified. 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

mname 

QUAL 

qualifier 


mname Optional 1-8 character micro name by which the previous qualifier can be 

referenced in subsequent QUAL instructions or symbol references. If mname 
is present, the value of the micro named mname is (re)defined to be the 0-8 
characters comprising the qualifier in effect prior to this QUAL instruction. 

qualifier A symbol qualifier or * or blank, as follows: 

qualifier 1-8 character name, the first character of which cannot be $ or 

= or : or numeric. The qualifier cannot contain the characters 

+ - * / , or a 
A blank terminates the qualifier. 

Any symbol defined subsequent to this QUAL up to the next 
QUAL must be referenced from outside the QUAL sequence as 

/ qualifier/symbol 

The current qualifier appears as the third sub-subtitle on the 
assembly listing (section 11.1). 

* The assembler resumes using the qualifier in use prior to the 

current qualifier. The assembler records occurrences of QUAL 
pseudo instructions and maintains a table of the most recent 50 
occurrences. Each QUAL * resumes use of the most recent entry 
and removes if from the list. When the subprogram contains more 
QUAL * instructions than there are entries in the stack, 

COMPASS uses the null (global) qualifier. 
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blank 


A blank variable field causes any symbols defined up to the next QUAL to be 
global. A global symbol does not require a qualifier. 


NOTE 

The first attempt to redefine a global symbol from 
within a QUAL sequence results in A and U errors. 
The symbol is defined local to the QUAL sequence 
with a zero value. To avoid fatal errors, precede 
any redefinition instruction (SET, MAX, MIN, or 
MICCNT) within a QUAL sequence with a blank QUAL 
and follow it with a QUAL *. 


Examples: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 



GUAL 

PASS! 1 


prop 

• 

F IBCOE QUALIFIED 3V PASS1 

• | 



• 

FO 

* | 

LOCI 1 



GUAL 

PASS? 1 


RODE 

FQU 

LOO? Ircoe qualified by pass? 



OUAl 

• 

ISYPBOLS GLOBAL F°0M NOW ON 

1 


GLOB 

BSS 

• 

• 1 

" jGLOB IS GLOBAL 



• 

RJ 

• 

. 1 

/PASS1VBCDF|JUMP TO PASS1 ROUTINE 

* 1 



• 

RJ 

# 1 

/PASSP/RCOE1JUPP TO PASS? ROUTINE 
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Location Code Generated 


!««?* 7777777777777777777% 


mm 


10BB5 7777777777777777777 ^ 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


TAP 

MACRO 

BLOCK,KWAL i 



USE 

BLOCK j 



OUAL 

KWAL 


TAG1 

BSS 

1 BP 


TAG2 

VFD 

eo/-i j 



USE 

* ' 

1 



QUAL 

ENOM 

• 

* ' 

1 

I 



• 

TAB 

1 

ONE,ONF | 

Bjl 


USE 

ONE 



QUAL 



TAGl 


1; j 

rW 

L. • ■" Sft* 






fell HM 

V 


I B 

EiEB 

* 1 

■ }y ' - | 

« 


TAB 

TWO,THO 



USE 

TWO 


. PS 

QUAL 

THO 1 

M 

* ' ' " .TJ. 

-.. 'imm 



i i|§ 


mmW. I 
HI 

« 1 


E&k. 

till i 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

i 


11 

18 

130 







QUAL 

z 

1 


71 

BSS 

0 

Izi QUALIFIED BY 7 



• 

• 

1* 



• 

« 

i • 



• 

• 

| • 



QUAL 

B 

.EQUATE SYMBOLS SO THAT 


71 

2 

/Z/Zl 

|Z1 IN Z CAN BE REFERREO 


| TO AS Zi IN B 


4.4.5 B1 = 1 AND B7 = 1 - DECLARE THAT B REGISTER CONTAINS ONE 

The Bl=l and B7=l pseudo instructions declare that in this CPU subprogram, the contents of the B1 
register or the B7 register, respectively, are one. These instructions do not produce code; they alter 
the way in which code is generated by the R= instruction (section 4. 8.7) and define the symbol Bl=l 
or B7=l. If more than one instruction is used, the assembler uses the last one encountered. 
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Formats: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


Bl=l 

B7=l 



A symbol in the location or variable field is ignored. 

Note that loading the respective B register with one is the user's responsibility. 
For an example of use, refer to R= (section 4.8.7). 


4.4.6 COL - SET COMMENTS COLUMN 

The COL pseudo instruction sets the column number at which the comments field can begin when the 
variable field is blank. If no COL instruction is used in the subprogram, COMPASS uses 30. 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


COL 

n 


n An absolute evaluatable expression designating the column number; n 12. When base is M, n 

is assumed to be decimal. If n is less than 12, COMPASS sets the column at 12. If n is zero 
or blank, COMPASS sets the column to 30, the default column. 

If the current operation field extends past the current comments column, COMPASS 
substitutes a very large number for n in the current instruction only; that is, if n is less than 
or equal to the last column of the operation field, a variable field must be present if a 
comment is present. 

A location field symbol, if present, is ignored. 

Example: 


44 



LOCATION 

OPERATION 

variable 

COMMENTS 

i 


11 

18 

1 30 







COL 

36 

1 



USE 


{RETURN TO BLOCK 0 

i 

i 


In this example, subsequent statements for which the variable field is blank cannot have comments 
beginning before column 36. 
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4.5 BLOCK COUNTER CONTROL 


Counter control pseudo instructions establish local blocks, labeled common blocks, and blank common 
blocks in addition to the absolute, zero, and literal blocks established by the assembler; they control use of 
all program blocks, and provide the user with a means of changing origin, location, and position counters. 


4.5.1 USE - ESTABLISH AND USE BLOCK 

USE establishes a new block or resumes use of an already established block. The block in use is the block 
| into which code is subsequently assembled. A user may establish up to 252 blocks in a block group. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


USE 

block 


block Identifies block to be used, as follows: 

0 or blank Nominal block (absolute or 0). 

// Blank common block; for a relocatable subprogram, this block cannot 

contain data. The only storage allocation instructions that can follow are 
BSS and ORG. The BSSZ instruction is illegal because it presets the block 
to zeros. 

/name/ Labeled common block. A name can be a maximum of 7 characters and 

cannot include blank or comma. The first and last characters must not be 
colons. Conventions imposed by the loader or other assemblers or 
compilers could further restrict the use of names. 

name Local block. A name can be 1 through 8 characters, excluding blank or 

comma. The first character must not be a colon. Use of this name 
enclosed by brackets does not cause the block to become a labeled common 
block. For example, USE A and USE/A/ are different blocks. 

* Block in use prior to current USE, USELCM, ORG, or ORGC. See 

discussion following. 

A location field symbol, if present, is ignored. 

The nominal program block contains the entire program if no USE or USELCM is encountered. 

Redundancy between block names is permitted as follows. 

A labeled common block designated by /0/ can coexist with the program block designated by 0. Blank 

common designated by // can coexist with a labeled common block designated as ////. 
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A CPU subprogram may have two blocks with the same name and the same memory type if they have 
different block types (local or common). Furthermore, a CPU subprogram may have two blocks 
with the same name and the same block type if they have different memory types (CM/SCM or 
ECS/LCM). Thus, altogether, there may be up to four different blocks with the same name. 

When a block is first established, its origin and location counters are zero and its position counter is 
either 60 (CPU subprogram) or 12 (PPU subprogram). When a different block than that in use is 
indicated, COMPASS saves the values of the current origin and position counters along with an 
indicator as to whether the next instruction is to be forced upper. If the most recently assembled 
instruction under the block is one that forces the next instruction upper, the first instruction 
assembled upon resumption of the block is forced upper. When the designated block has been 
previously established, COMPASS resumes assembly in the block using the last known values for 
the origin and position counters. The value of the location counter is not saved. Upon resumption of 
the block, it is set to the value of the origin counter. If a LOC had been used previously, resetting 
of the location counter to produce the desired results is the responsibility of the programmer. 

The assembler records occurrences of USE, USELCM, ORG, and ORGC pseudo instructions (except 
USE * and USELCM *) and maintains a USE table of the most recent 50 occurrences. Each USE * and 
USELCM * resumes use of the most recent entry and removes it from the table. When the subprogram 
contains more USE * or USELCM * instructions than there are entries in the stack, COMPASS uses 
the nominal block. 


Examples: 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



J 


11 

18 

I 30 


l? Giooooonon 

35 ir?04uonononaooooooo 

14 5i3oaonnon 


GAMMA 

SAP 

USF 

PJ 

USF 

DATA 

USF 

SA? 

ALPHA 

DA T A1 

1. C 
* 

SAM 

1 

1 BLOCK 

1 BLOCK 

1 

I RESUME 
1 

0 IN USF 

DATA1 IN USF 

USF OF BLOCK 0 


Note that the SA3 is forced upper because the RJ causes a force upper of the next instruction in the 
block. — _ ____,_ 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


11 

18 

1 30 





USE. 


TABLE 

USE TABLE LOCAL 8L0CK 

2615 00 



VFO 


6/0 

1 





USE 


♦ 

• 

I RESUME 

1 . 

i 

PREVIOUS BLOCK 




« 

• 

USE 


• 

• 

TABLE 

i; 

RESUME 

USING TABLE 

30002600 + 



VFO 


6 / 1RX , 18 /S 





USE. 


* 

RESUME 

PREVIOUS BLOCK 


Note how separate blocks can be used to facilitate packing of partial-word bytes into a table residing in 
a block other than the one primarily being used. 
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The USELCM pseudo instruction establishes or resumes use of a block assigned to extended core 
storage (ECS) or large core memory (LCM). For all ECS/LCM blocks in an absolute CPU assembly, 
and for the ECS/LCM blank common block in a relocatable assembly, data generating instructions 
(including BSSZ) and symbolic machine instructions are illegal; only storage reservation pseudo 
instructions (BSS, ORG,and ORGC) are allowed. The USELCM pseudo instruction is illegal in PPU 
assemblies. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


USELCM 

block 

' 


block: Identifies block to be used, as follows: 


0 or blank Illegal. 

// Blank common block. A subprogram can have two blank common 

blocks if one of them is in ECS/LCM. 

/name/ Labeled common block. The name can be a maximum of 7 

characters and cannot include blank or comma. The first and last 
characters must not be colons. The loader or other assemblers or 
compilers could further restrict the use of names. 

name Local block. If The name can be 1-8 characters, excluding blank or 

comma. The first character must not be a colon. Use of this name 
enclosed by brackets does not cause the block to become a labeled 
common block. For example, A and /A/ are different blocks. All 
of the local ECS/LCM blocks are concatenated to form a single block, 
which is treated by the loader as an ECS/LCM common block whose 
name is unique to the subprogram. 

* Block in use prior to current USE, USELCM, ORG, or ORGC. 

A location field entry, if present, is ignored. 

The length of each ECS/LCM block, including the combined local block, is rounded up, if necessary, 
to an integral multiple of eight 60-bit words. The maximum size of an ECS/LCM block is 1,048,568 
words. 

Further rules for USELCM are the same as for USE. 


t SCOPE 2 does not currently allow local blocks in LCM. 
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Examples: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

Uo 



BASE 

0 

-f - — 

i 



USfcLCM 

LCM 

i 

jESIABLISH ANO use lum block 


LCMC 

BSS 

0 

|UEFINE SYMBOL LCMC 


8L0C1 

6SS 

100 

RESERVE 100 WORDS 


BL0C2 

BSS 

200 

[RESERVE 200 MORQS 



USE 

• 

♦ 

• 

[RESUME PREVIOUS BLCUk 

l 



• 

ORG 

• 

BLOC1+10QQB 

! 

1 


BL0C3 

BSS 

20 

■RESERVE 20 MORE WORDS 



USE 

* 

•resume previous block 


4.5.3 ORG AND ORGC - SET ORIGIN COUNTER 


ORG Indirectly indicates the block to be used for assembly of subsequent code and specifies the value 
to which the origin and location counters are to be set. COMPASS makes an entry in the USE table and 
saves the current origin and position counter values. 

ORGC t indirectly indicates the block to be used for assembly of subsequent code aiid specifies the value 
to which the origin and location counters are to be set. COMPASS makes an entry in the USE table and 
saves the current origin and position counter values. In a PPU or absolute assembly, ORGC is the 
same as ORG. In a relocatable CPU assembly, ORGC is the same as ORG if the USE block specified 
by the address expression is not a common block; otherwise, code following an ORGC is ignored by 
the Unking loader if that common block was first declared by a previously loaded subprogram. If two 
or more programs in a load sequence preset relocatable text within the same common block, the ORGC 
must be used; otherwise, multiple relocation of those words can occur. 

Formats: 


LOCATION 

OPERATION 

variable subfields 


ORG 

exp 


ORGC 

exp 


exp Expression specifying the address to which the origin and location counters are to be 

set. Following ORG or ORGC, the assembly resumes at the upper position of the 
location specified. COMPASS determines the block as follows: 


t Not supported by SCOPE 2 Loader. 
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1. If the expression contains a symbolic address, COMPASS uses the block in 
which the symbol was defined. 

2. COMPASS uses the current block if the value of the expression is *, *L, or 
*0. If the origin and location counters are the same value, and no code has 
been assembled in the current location, the only effect of *, *L, or *0 is to 
force the next instruction upper„ If a word is partially assembled, however, 
the code already assembled into the location is lost. 

If the counter values differ, * or *L sets the origin counter to agree with the 
location counter value; *0 sets the location counter to the origin counter value. 

3 0 An absolute expression causes use of the absolute block. In a relocatable 
assembly, this is the only way to establish the absolute block. All symbols 
defined in the absolute block are absolute. 

Any symbols in the expression must be already defined in the assembly and must not result in a 
negative relocatable value. It is not possible to ORG or ORGC into the literals block. 

A location field symbol, if present, is ignored. 

Once an ORGC pseudo instruction has established the conditional loading indication for a given common 
block, it is in effect whenever assembly in that block is resumed by subsequent USE or USELCM 
pseudo instructions, and can be cleared only by an ORG pseudo instruction specifying that block. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

Uo 




USE 

ALPHA 

I 




• 

• 

i • 




• 

• 

I* 




• 

• 

r 



ABC 

DATA 

20*190,1000 

1 LOCATED IN 

| 

ALPHA 



• 

• 

1 

• 




• 

• 





USE 

BETA 

1 



XV7 

8SS 

0 

[LOCATED IN 

BETA 



• 

• 

| * 




• 

• 

' • 




• 

• 

' • 




ORG 

ABC 

ISETS ALPHA 

COUNTERS TO ABC 



-• 

• 

| AND RESUMES 

USE OF ALPHA 



• 

• 

1 • 




BSS 

1000 

1 




• 

• 

• 




•• 

• 

* • 
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LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


li 

18 

I 30 



ORG 

50 

ISETS ABSOLUTE BLOCK COUNTER 



• 

• 

. TO 50 ANO BEGINS ITS USE 



ORG 

• 

xrz+ioo 

• 

ISETS BETA COUNTERS TO XYZ+103 

i* 



• 

USE 

. 

• 

* 

• 

r 

IRESUMES ABSOLUTE BLOCK 

I* 



• 

USE 

• 

• 

♦ 

♦ 

r 

'resumes BLOCK ALPHA 

1 

• 

1 



• 

• 

USE 

• 

• 

♦ 

• 

• 

1 • 

1 • 

(RESUMES BLOCK BETA 

r 
■ • 



• 

USE 

• 

• 

• 

1 

i: 

IRESUMES BLOCK ALPHA 

h 



USE 

• 

• 

# 

i: 

[resumes nominal block 



• 

• 

1 



USE 

/TATA/ 

1 


DATA 

ass 

0 

1 



ORGC 

OATA 

1 



DATA 

1.2.3 

(CONDITIONALLY PRESET OATA 
| 



USE 

ANYBLOCK 

1 



SON 

3RXYZ 

'unconditional data 



USF 

♦ 

1 


FOUR 

OATA 

4 

|RFTURN TO /OATA/ STTLL 



TATA 

5,6 

CONDITIONALLY SKIPPING 

1 



ORG 

FOUR 

1 



ZR 

XI,ERROR 

'UNCONDITIONALLY LOADED 



RJ 

• 

• 

• 

SUB4 

1 INSTRUCTIONS 

1 

i 


4.5.4 BSS—BLOCK STORAGE RESERVATION 

The BSS instruction reserves core in the block in use by adjusting the origin and location counters. It 
does not generate data to be stored in the reserved area. A primary application is for reserving blank 
common storage. It can also be used to reserve an area to receive replicated code (see REP, REPC, 
and REPI, section 4o 8.8). 
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Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

BSS 

aexp 


sym If present, sym is defined as the value of the location counter after the force 

upper occurs. It is the beginning symbol for the storage area. 

aexp Absolute expression specifying the number of storage words to be reserved. 

All symbols must be previously defined; aexp cannot contain external symbols. 
The value of the expression can be negative, zero, or positive and the value 
is added to both the origin counter and the location counter. A BSS 0 or an 
erroneous expression causes a force upper and symbol definition but no storage 
is reserved. 

Example: 



4.5.5 LOC - SET LOCATION COUNTER 

A LOC pseudo instruction sets the value of the current location counter to the value in the variable 
field expression. The location counter is used for assigning address values to location symbols. 
Changing the location counter permits code to be generated so that it can be loaded at the location 
controlled by the origin counter and moved and executed at the location controlled by the location 
counter. Thus, any addresses defined while the location counter is different from the origin counter 
will be correctly relocated only after the code is moved. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


LOC 

exp 
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exp Relocatable expression specifying the address to which the location counter 

is to be set. Any symbols in the expression must be already defined in the 
assembly and must not result in negative relocation. 

A location field symbol, if present, is ignored. 

Following a LOC, if the value of the location counter differs from the origin counter, the location field 
is flagged with an L on the listing until a LOC *0, USE, ORG, ORGC, or USELCM instruction resets the 
location counter to the value of the origin counter. 

A LOC instruction does not affect the origin counter except that it causes the next instruction to be 
forced upper. The only effect of LOC * or LOC *L is to force upper. Because COMPASS does not 
save the value of the location counter when it switches blocks, a USE, ORG, ORGC, or USELCM for 
a different block effectively resets the location counter to the origin counter value. When use of the 
block is resumed, it is the responsibility of the user to reset the location counter to produce the desired 
results. 

Example: 

In the following example, the first LOC is used to generate PPU code that is to be loaded into one 
PPU and transmitted to a different PPU for execution. The second LOC is used so that on the listing 
the address field contains the table ordinal rather than a load address. At the end of the table, a LOC 
instruction changes the location counter to resume counting under the first LOC. At the end of the 
program, LOC *0 returns the location counter to the value of the origin counter. 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 ! 30 





-.-—- 

1 


T 1 

EQU 

1 1 

0 


CH 

EQU 

0 1 

7100 



ORG 

7100 | 

7100 


RES 

BSS 

0 

L 100 



LOC 

100 I 

L 100 2400 


P PR 

PSN 

o 1 

L 101 2400 



PSN 

0 1 

L 102 2400 



PSN 

0 1 

L 103 6100 0100 



EIM 

PPR,CH | 



• 

• 

• 



• 

• 

1 



• 

• 

• j 

L 205 


PPRft 

BSS 

0 ' 

L 0 



LOC 

0 | 

L 0 0100 



CON 

PPR 

L 1 0114 



CON 

STM 1 

L 2 0121 



CON 

0PM j 

L 3 0132 



CON 

EXR 

L 4 0136 



CON 

CHS 1 

L 5 0147 



CON 

OMP 1 

L 6 0240 



CON 

eno ; 

L 7 1000 



CON 

1000 ! 



• 

• 

. | 



• 

• 

• | 



• 

• 

• 

L 215 



LOC 

♦0-RES+PPR ! 

L 215 



BSS 

240-* , 

L 240 


END 

BSS 

1 

7240 



LOC 

*0 1 
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4.5.6 POS - SET POSITION COUNTER 


The POS pseudo instruction sets the value of the position counter for the block in use to the value 
specified by the expression in the variable field. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


POS 

aexp 


aex P An absolute evaluatable expression having a positive value less than or 

equal to the assembly word size (60 for CPU, 12 for PPU). A negative value, or 
a value greater than 60 (or 12), causes an error. The value indicates the bit 
position within the current word at which the assembler is to assemble the next 
code generated. Use caution, because if the new position counter value is greater 
than the old position counter value, part of the word is reassembled. (New code 
is ORed with previously assembled data.) If the new position counter value is less 
than the old position counter value, the assembler generates zero bits to the 
specified bit position. If the value of aexp is zero, COMPASS assembles the next 
code in the following word. 


A location field symbol, if present, is ignored. 

NOTE 

If the POS instruction is used on a word containing relocatable or external 
addresses, undefined results can occur with no diagnostics. 


The POS instruction does not alter the origin and location counters. The position counter is never 0 
at the beginning of an instruction. At the beginning of a new operation, if a data value has been 
stored into bit 0 (the rightmost bit) of a word, COMPASS increments the origin counter and the 
location counter and resets the position counter to 60 (or 12). 

A POS *P has no effect whereas a POS $ subtracts one from the counter. 


4.6 SYMBOL DEFINITION 

The pseudo instructions EQU, =, SET, MAX, MIN, and MICCNT permit direct assignment of 21-bit 
values to symbols. The values can be absolute, relocatable, or external. Register designators are 
not valid in the expressions. Subsequent use of the symbol in an expression produces the same result 
as if the value had been used as a constant. In the listing of the symbolic reference table, a refer¬ 
ence to an EQU, =, SET, MAX, MIN, or MICCNT instruction is flagged with a D. Symbols defined 
using EQU and = cannot be redefined; symbols defined using any of the other symbol definition 
instructions can be redefined. 
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4.6.1 EQU OR = - EQUATE SYMBOL VALUE 


An EQU or = pseudo instruction permanently defines the symbol in the location field as having the value 
and attributes indicated by the expression in the variable field. 

Formats: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

EQU 

exp 

sym 

= 

exp 


sym A location symbol is required. See section 2.4 for symbol requirements. 

exp An evaluatable expression. Any symbols in the expression must be previously 

defined or declared as external. The expression cannot contain symbols 
prefixed by =S, =X, or =Y unless the symbols have also been defined conven¬ 
tionally. If the expression is erroneous, COMPASS does not define the location 
symbol but flags an error. 

Examples: 




LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


I 


11 

18 

1 30 






2043 7 

7k 

3 

7k 
bkZ7 1 


OPS 

LINP 

OH 

(-■AGESIZ 

LOOPS 

EUJ 

E.L J 

2Q437B 

7 kii | 

3 1 

LIMP 1 

*-GPS | 


4.6.2 SET - SET OR RESET SYMBOL VALUE 

A SET pseudo instruction defines the symbol in the location field as having the value and attributes 
indicated by the expression in the variable field, A subsequent SET using the same symbol redefines 
the symbol to the new value and attributes. SET can be used to redefine symbols defined by SET, MAX, 
MIN, or MICCNT, only. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

SET 

exp 
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sym A location symbol is required. See section 2.4 for symbol requirements. 

exp An evaluatable expression. The expression cannot include symbols as yet undefined 

and cannot contain symbols prefixed by =S, =X, or =Y, unless the symbols are 
also defined conventionally. 

If the expression is erroneous, COMPASS does not define the symbol but 
issues a warning flag. 

The symbol in the location field cannot be referred to prior to its first definition. 

Examples: 



4.6.3 MAX - SET SYMBOL TO MAXIMUM VALUE 

The MAX pseudo instruction defines the symbol in the location field as having the value and attributes 
indicated by the largest (most positive) value of the expressions in the variable field. A subsequent 
SET, MAX, MIN, or MICCNT using the same symbol redefines the symbol to the new value. 
Conversely, MAX can be used to redefine symbols defined by these instructions. 

Format: 


LOCATION 

OPERATION _ 

VARIABLE SUBFIELDS 

sym 

MAX 

exp^expg,... >exp n 


sym A location field symbol is required. See section 2. 4 for symbol requirements. 

exp. An evaluatable expression. Any symbols in the expression must be previously 

1 defined. The expression cannot contain symbols prefixed by =S, or =X, or =Y 

unless the symbols are also defined conventionally. 
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The expressions should have similar attributes. No test is made for attributes. The test for maximum 
value is made in pass one. In testing for the maximum value in pass one, COMPASS uses values for 
relocatable symbols relative to block origins. 

NOTE 

During pass two, the expression selected in pass one is 
used. The relocatable symbols have been reassigned 
values relative to program origin and these values are 
used for the final value of the expression selected in the 
first pass. 

If any of the expressions are erroneous, COMPASS does not define the symbol but issues a warning flag. 
The symbol in the location field cannot be referred to prior to its first definition. 

Example: 




LOCATION 

OPERATION 

VARIABLE COMMENTS 


1 


n 

18 130 

5 


PT 3 

EQU 

5 ! 

6 


PT31 

EQU 

6 i 

2 


PT32 

EQU 

2 i 

I 

6 


SYM 

MAX 

PT3fPT31fPT32 

i 


4.6.4 MIN - SET SYMBOL TO MINIMUM VALUE 

A MIN pseudo instruction defines the symbol in the location field as having the value and attributes 
indicated by the minimum or least positive value of the expressions in the variable field. A subsequent 
SET, MAX, MIN, or MICCNT using the same symbol redefines the symbol to the new value. 
Conversely, MIN can be used to redefine symbols defined by these instructions. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

MIN 

exp 1 ,exp 2 .exp n 


sym A location symbol is required (section 2.4). 

ex p. An evaluatable expression. Any symbols in the expression must be previously 

* defined. The expression cannot contain symbols prefixed by =S, =X, or =Y, 

unless the symbols are also defined conventionally. 

The expressions should have similar attributes; no test is made for attributes. 

The test for minimum value is made in pass one. In testing for the minimum value in pass one. 
COMPASS uses values for relocatable symbols relative to block origins. 
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NOTE 


During pass two, the expression selected in pass one is 
used. The relocatable symbols have been reassigned 
values relative to program origin and it is these values 
that are used for the final value of the expression which 
was selected in the first pass. 

If any of the expressions are erroneous, COMPASS does not define the symbol but issues a warning 
flag. 

The symbol in the location field cannot be referred to prior to its first definition. 

4.6.5 MICCNT - SET SYMBOL TO MICRO SIZE 

The MICCNT pseudo instruction defines the symbol in the location field as having a value equal to the 
number of characters in the value of the micro named in the variable field. A subsequent SET, MAX, 
MIN, or MICCNT using the same symbol redefines the symbol to the new value. Conversely, MICCNT 
can be used to redefine symbols defined by these instructions. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

MICCNT 

mname 


sym A location symbol is required (Section 2.4). 


mname Name of a previously defined micro; it may be a system micro or may have 

been defined through MICRO, OCTMIC, DECMIC, or BASE. If mname has 
not been previously defined, the location symbol is not defined (or redefined) 
and a warning flag is issued. 


Example: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


U 

18 

| 30 



MSG 

MICRO 

• 

1,,’STRING* IDFFINE 6-CHARACTER MICRO 

* I* 


MSIZE 

• 

MICCNT 

• 

MSG 

• 

I* 

• 

'MSIZE EQUALS 

1. 

1 

6 


MSG 

• 

MICRO 

• i • 

• 1* 

1, ^ALPHANUMERIC *msg** 

19 CHAR. MICRO 


MSG 

MICRO 

It »*ALPHANUMERIC STRING* 

19 CHAR. MICRO 


MSIZE 

MICCNT 

MSG 

Imsize equals 

19 


4-42 


60492600A 


4.6.6 SST - SYSTEM SYMBOL TABLE 


An SST pseudo instruction defines system symbols, with the exception of the symbols noted, as if the 
symbols had been defined in the subprogram. 

When a system text overlay is used as input to an assembly through the G or S option on a COMPASS 
control card, all micros and opcodes in the system text overlay are defined automatically at the start 
of each assembly; however, the symbols in the system text overlay are defined only for assemblies 
that contain the SST pseudo instruction. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBEIELDS 


SST 

sym 1 ,sym 2 ,...,sym n 


sym. One or more symbols on the file that are not to be defined. 

A location field symbol, if present, is ignored. 

Refer to section 10. 2 for an example of SST use. 


4.7 SUBPROGRAM LINKAGE 

Pseudo instructions ENTRY, ENTRYC, and EXT do not define symbols but either declare symbols 
defined within the subprogram as being available outside the subprogram or declare symbols referred 
to in the subprogram as being defined outside the subprogram. 


4.7.1 ENTRY AND ENTRYC - DECLARE ENTRY SYMBOLS 

The ENTRY pseudo instruction specifies which of the symbolic addresses defined in the subprogram 
can be referred to by subprograms compiled or assembled independently; ENTRY lists entry points to 
the current subprogram, ENTRY is illegal in PPU assemblies. 

The ENTRYC f pseudo instruction conditionally specifies which of the symbolic addresses defined in 
the subprogram can be referred to by subprograms compiled or assembled independently; ENTRYC 
lists conditional entry points to the current subprogram. ENTRYC is illegal in PPU assemblies and 
is synonymous with ENTRY in absolute CPU assemblies. In a relocatable assembly, an entry point 
symbol declared by ENTRYC is ignored by the linking loader if the value of the symbol is relative to a 
common block and that common block was first declared by a previously loaded subprogram. 


tNot supported by SCOPE 2 Loader. 
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Formats: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


ENTRY 

ENTRYC 

sym 1 ,sym 2 ,... ,sym n 

sym , sym ,..., sym 
i. & n 


sym. Linkage symbol; 1-7 characters of which the first must be alphabetic (A-Z) and the 

last must not be a colon. The symbol cannot include the following characters: 

+ - * / blank , or A 

Each symbol must be defined in the subprogram as nonexternal (cannot begin with 
=X or =Y or be listed on an EXT pseudo instruction). Entry point symbols must be 
unqualified (section 2.4.5). 

A location symbol, if present, is ignored. 

A list of all entry points declared in the subprogram precedes the assembly listing. An asterisk 
appears to the right of each conditional entry point. 


Example: 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 


1 


H 

18 130 




IDF.NT 

ass 

CT > CON TROL *c!oNTROL 




ENTRY 

MODE | 




ENTRY 

ONSW , 




ENTRY 

OFFSW 1 




ENTRY 

ROLLOUT S 




ENTRY 

SETPR 




ENTRY 

SETTL 1 




ENTRY 

SWITCH 1 

110 



ORG 

lion 

110 


CONTROL 

BSS 

0 1 

110 5120000100 


•fOOE 

SA2 

octp i 

7T720 



SX7 

X2 

111 5110000002 



SA1 

2 1 




• 

1 

• 




• 

• * 




• 

• ! 
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4.7.2 EXT - DECLARE EXTERNAL SYMBOLS 


The EXT pseudo instruction lists symbols that are defined as entry points in independently compiled or 
assembled subprograms for which references can appear in the subprogram being assembled. The 
EXT pseudo instruction is illegal in an absolute subprogram. In a relocatable subprogram, EXT 
defines symbols as strong externals (section 2.4.1). 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


EXT 

sym 1 ,sym 2 ,... ,sym n 


S' 


sy m i Linkage symbol, 1-7 characters of which the first must be alphabetic (A-Z) and the 

last must not be a colon. The symbol cannot include the following characters; 

+ - * / blank , or a 

These symbols must not be defined within the subprogram. External symbols 
are unqualified. 


A location field symbol, if present, is ignored. 

An external reference is flagged with an X in the address field in the listing of code generated. All 
external symbols are listed in the header information for the assembly listing. 

4.8 DATA GENERATION 

The instructions described in this section are the only pseudo instructions that generate data. All 
other program data is generated through symbolic machine instructions. An instruction that 
generates data cannot be used in a blank common block. The pseudo instructions that generate data 
are: 


BSSZ 

blank operation field 

DATA 

DIS 

LIT 

VFD 

CON 

R= 

REP, RE PC, or RE PI 


Generates zeroed words 

Generates one zeroed word 

Generates one or more words of data 

Generates one or more words of data 

Generates literals block entries 

Places expression values in user-defined fields 

Places expression values in full words 

For use in macros; R= assumes that either (Bl)=l or (B7)=l and 
generates increment instructions accordingly 

Does not actually generate object code at assembly time but 
causes the relocatable loader to repeatedly load a sequence of 
code into a reserved blank storage area. 
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4.8.1 BSSZ AND BLANK OPERATION FIELD—RESERVE ZEROED STORAGE 


The BSSZ instruction reserves zeroed core in the block in use. The origin and location counters are 
adjusted by the requested number of words and the assembler generates data words of zero to be 
loaded into the reserved area. An instruction that contains a symbol in the location field but has a 
blank operation field has the same effect as a BSSZ of one word. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

BSSZ 

aexp 


sym If present, sym is defined as the value of the location counter after the force 

upper occurs. The symbol identifies the beginning of the reserved storage area. 

aexp Absolute evaluatable expression specifying the number of zeroed words of 

storage to be reserved. The expression cannot contain external symbols or 
result in a relocatable or negative value. 

A BSSZ 0 or an erroneous expression causes a force upper and symbol definition but no storage is 
reserved. 

A BSSZ or group of BSSZ instructions of six or more words produces an REPL table in object code to 
reduce the physical size of the object program (appendix B). 

For a blank operation field the listing shows one zero word of data; for a BSSZ instruction the listing 
shows the word count. 

4.8.2 DATA - GENERATE DATA WORDS 

The DATA pseudo instruction generates one or more complete 60-bit or 12-bit data words in the 
current block for each item listed in the variable field. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

DATA 

item^, item g,...»item n 


If present, sym is assigned the value of the current location counter after 
the force upper occurs. It becomes the symbolic address of the first item 
listed. 
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ltem i Character, octal numeric, or decimal numeric data item, according to 

specifications described in section 2.7. Floating point notation is illegal in 
PPU assemblies. Items are separated by commas and terminated by a blank. 

A literal cannot be used as an item. 

A DATA pseudo instruction always forces upper. A blank item does not cause generation of a data word. 


Unless the D list option is selected, only item^ appears on the listing. 


Examples: 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 



1 


11 

18 130 

552 

14071700000000000000 


OPTB 

DATA 

-1- 

OLLGO 1 

553 

4000000C000000000000 


OPT 

DATA 

19SG9 1 

554 

03171520111405000000 


OPTT 

DATA 

0LC0MPIL E 1 

555 

17252420252400000000 


OPTO 

OATA 

QLOUTPUT,0 1 

556 

OOOOOOOOOOOOOOOOOQOO 




| 

557 

17205146314631463146 


OPTY 

DATA 

1.3EE 1 

560 

16403146314631463146 





Location 


1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 
1260 
1261 
1262 


Code Generated 


Di*0 


7070 
7770 
0000 
0 0 34 
5501 
0000 
0506 
0123 
7773 
0401 
2401 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


II 

18 

I 30 







PERIPH 

BASE 

0 

1 

1 



• 

• 

1 

I 


)AT 

DATA 

7070,-7,0, 

lpi 

1 



DATA 

2C A,0LFF 

I 

1 

1 



DATA 

0123,-4 

1 

1 



DATA 

H'DATA* 

1 


4.8.3 DIS—GENERATE WORDS OF CHARACTER DATA 


The DIS pseudo instruction generates words containing character data. The instruction can be used 
conveniently when a character data string is to be used repeatedly. Unless the D list option is selected 
only the first word of character data appears on the listing. The instruction has two formats: 
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Format one: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

DIS 

n, string 


sym If present, sym is assigned the location counter value after the force upper 

occurs. It is the symbolic address of the first word containing the character 
string. 


n An absolute evaluatable expression specifying an integer number of words to be 

generated. When base is M, COMPASS assumes that n is decimal. 

string Character string 

For a CPU program, COMPASS takes 10 times n characters from the string and packs them as they occur 
10 characters per word into n words. For a PPU program, COMPASS takes two times n characters from 
the string and packs them as they occur two characters per word into n words. If the statement ends 
before 10 x n (or 2 x n) characters, the remainder of the requested words are filled with blanks. 

If n is 0, COMPASS assumes the instruction is in format two. 


Format two: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

DIS 

.dstringd 


sym If present, sym is assigned the location counter value after the force upper 

occurs. It is the symbolic address of the first word containing the character 
string. 

d Delimiting character 

string Character string; any character other than delimiting character 

In this form, the string must be bounded by delimiters. The comma is required. The characters between 
the two delimiting characters are packed into as many CPU or PPU words as are needed to contain them. 
Twelve zero bits are guaranteed at the end of the character string even if COMPASS must generate an 
additional word for them. If COMPASS detects the end of the statement before it detects a second 
delimiting character, it produces a fatal error. 
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Examples: 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

| 30 

561 07051605220124055535 

562 55032025552717220423 


ONE 

OIS 

2,GENERATE 

?! CPU WORDS 

1 

563 07051605220124055535 

564 55032025552717220423 

565 00000000000000000000 


TWO 

DIS 

,'GENERATE 2| CPU WORDS* 

1 

1 


Location Code Generated 


Or* M 


1402 

07C5 

1403 

16 o 5 

1404 

22C1 

1405 

2405 

140b 

5534 

1407 

3355 

1410 

2020 

1411 

55 27 

1412 

1722 

1413 

0423 

1414 

0705 

1415 

1605 

1416 

2201 

1417 

2405 

1420 

5534 

1421 

3355 

1422 

2020 

1423 

5527 

1424 

1722 

1425 

0423 

1426 

0 U(i 0 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 Uo 



ppj 

BASE 

Li IS 

UIS 

i 

1 0 * GENERA T £, lu PP WORUS 

1 

1 

1 

i 

1 

i 

*'GENERATE 1C PP WORDS* 

1 

1 

1 

1 

1 


4.8.4 LIT - DECLARE LITERAL VALUES 

A LIT pseudo instruction generates data words in the literals block. This instruction and the 
= prefix to a data item provide the only means of generating data in the literals block. The LIT 
pseudo instruction assures sequential entries for a table of values. 


Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

LIT 

item-, item n ,..., item 

1 2 9 9 n 
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sym If present, sym is assigned the value of the literals block location counter. 

item. At least one and not more than 100 words of character, octal numeric, or 

1 decimal numeric data items. Section 2.7.3 contains specifications. Items 

are separated by commas and terminated by a blank. Floating point data 
items are illegal in PPU assemblies. 


COMPASS enters data items into the literals block in the order specified. 

If the converted binary values for all the data items listed with a single LIT match an existing literal 
block sequence, they are not duplicated. If, however, any item in the list does not match an entry in 
the block, the entire sequence is generated. A literal item subsequently referred to through an 
= prefix is not duplicated. A null item (e.g. H** or 0L) does not cause a word to be generated. 

Examples: 


Location 


Code Generated 

611 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


POOL 

LIT 

3.1,1.59265,2.7182182,57.2957795EE1 


008611 

000612 

000613 

000614 

000615 


CONTENT CF LITERALS BLOCK. 


17216146314631463146 

17206275576441776271 

17215337351136014426 

17314363651440663121 

16513333033540576566 


OOI-Y-Y-V- 

OP 1>.*6U + 
0QT42I3A9V 
0 Y8 * (*L5vYQ 
N ( 0 0C25 • »»v 


Location Code Generated 


7447 
7453 
7456 

CONTENT OF LITFRALS BLOCK. 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


It 

18 130 


N2 

LIT 

LIT 

LIT 

191,7070, 7, o! 

2C A.0LEF 1 

H*LITERALS* 1 


7447 

0034 

1 

7450 

7070 


7451 

0007 

G 

7452 

0000 


7453 

5501 

A 

7454 

0000 


7455 

Q506 

EF 

7456 

1411 

LI 

7457 

2405 

TE 

7460 

2201 

RA 

7461 

1423 

LS 
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4.8.5 VFD - VARIABLE FIELD DEFINITION 


The VFD instruction generates data in the current block by placing the value of an expression into a 
field of the specified size. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

VFD 

item^/expj,itemg/expg,... ,item n /exp n 


sym For a CPU assembly, the location field can contain sym, plus, minus, or 

blank, as follows: 

sym If a symbol is provided in the location field, a force upper occurs 

and the value of the location counter following the force upper is 
assigned to the symbol. The symbol identifies the first word of 
data generated by the VFD. 

+ Causes a force upper. Data generation begins in a new word. 

COMPASS generates zero bits to the next quarter word boundary, 
at which point the first field begins. 

blank COMPASS begins the first field at the current value of the position 

counter. 

For a PPU assembly, if the location field contains a plus, minus, or a symbol, 
data generation begins in a new word. If the location field is blank, the first 
field begins at the current value of the position counter. 

item. An unsigned constant or previously defined symbol having a value specifying a 

positive integer number of bits for the field to be generated; maximum field 
size is 60 bits for both CPU and PPU assemblies (60 being the maximum 
number of significant bits for an expression value). When base is M, item, 
is assumed to be decimal notation. 1 

exp i An absolute, relocatable, or external expression, the value of which will be 

inserted into the field specified by itemi. The expression is evaluated using 
the specified field size. Character constants are right or left justified in the 
field according to the type of justification indicated. In a relocatable CPU 
assembly, no field that contains a relocatable or external address expression 
can cross a 60-bit word boundary, and no 60-bit word can have more than 
four fields that contain relocatable or external address expressions. 


Each field is generated as it occurs. For a CPU assembly, if the next instruction that generates code 
in the block is not a VFD with a blank location field, and the last VFD field in the current VFD ends to 
the left of a quarter word boundary, COMPASS inserts zero bits up to the next quarter word boundary. 
These zero bits do not show on the assembly listing. Remaining parcels are then filled with no¬ 
operation instructions. 
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When a VFD instruction that does not have a location field entry immediately follows another VFD in the 
same block, no padding with zeros or forcing upper occurs; fields are generated sequentially as they are 
specified. 

Following a VFD, the position counter contains the number of bits remaining to be assembled in the last 
word in which data was generated by the VFD. 

Examples.: 


In the first example, the symbol TABLOC has been defined earlier in the program and associated with 
000551. 


Location Code Generated 


31 

566 24010200000023000551 

567 00000005665555555555 

570 777777774 

000000000000 

571 11172401550155555531 

572 00000015052323010705 

573 031117000000033 


Location Code Generated 


Or»M 


1310 


3334 

1311 


3536 

1312 


3740 

1313 


4142 

1314 

\ 

4344 

1315 

0010 

1316 


0011 

1317 


7765 

1320 


0707 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


1Y 

18 130 




1 


ALPHA 

SET 

25 1 


TABLE 

VFD 

36/3CTAB,6/iS?,18/TABL0C 



VFD 

33/*-l,30/5H ,ALPHA/-0 



VFD 

*P/ I 



VFD 

30/0HIDTA,6/IRA,24/0AX+1 



VFD 

60/0RMESSA GE *3 0/3LC10 * 15/0 RQ 

i 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

i 


11 

18 1 30 




1 _ 


N4 

PPU 

BASE 

VFD 

1 

M 1 

60/10RO1234567 89 

1 


All 

VFD 

1 

1 

12/10,12/11,12/-12.12/-7070 

1 

1 


4.8.6 CON - GENERATE CONSTANTS 


The CON pseudo instruction generates one or more full words of binary data in the block in use. It 
differs from DATA in that it generates expression values rather than data items and differs from VFD 
in that the field size is fixed. 


Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

CON 

exp 1 ,exp 2> ... ,exp n 


sym If present, sym is assigned the value of the location counter after the force 

upper occurs. 

exp. An absolute, relocatable, or external egression the value of which will be 

inserted into a field having a size of one word. For PPU assembly, floating 
point is not allowed; for CPU assembly, double precision is not allowed. 
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Examples: 

In the first example, the symbols FAIL and PASS have been defined earlier in the program and associated 
with 2204 and 2172, respectively. 


Location 

Code Generated 


LOCATION OPERATION 

VARIABLE 

COMMENTS 



1 

11 

18 

1 30 

1460 

0000 


MSGl CON 

0 

- 1 -- 

1461 

0006 


CON 

6 

1 

146? 

0003 


CON' 

3 

1 

1463 

2204 


CON 

fail 

1 

1464 

00?4 


CON 

20 

1 

1465 

0000 


MS(52 CON 

0 

1 

1466 

0006 


CON 

6 

| 

1467 

0003 


CON 

3 


1470 

2172 


CON 

PASS 


1471 

0024 


Con 

20 

1 


Location Code Generated 


L 0 

L 0 00000000000000000055 
L 1 0000000000000000006? 
L ? 00000000000000000064 
L 3 00000000000000000060 


L 75 00000000000000000066 

L 76 00000000000000000076 

L 77 00000000000000000055 

674 



4.8.7 R = - CONDITIONAL INCREMENT INSTRUCTION 


The R= pseudo instruction generates a CPU increment unit instruction depending on the contents of the 
variable subfields and on whether or not the subprogram earlier contained a Bl=l or B7=l pseudo 
instruction (section 4.4.4). 

Use of R= augments macro definitions and increases optimization of object code. It is illegal in a 
PPU program. 

The A list option controls listing of substituted instructions. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

R= 

reg,exp 


sym 
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Optional, if present, sym is assigned the value of the location counter after 
the force upper occurs. This force upper occurs whether the R= generates an 
instruction or not. 
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reg a register designator (A, X, or B) and a digit (0-7) which COMPASS 

concatenates with S to form the instruction operation code. 

exp Operand register or value expression. If exp is the same two characters 

as reg, no instruction is generated. 

If the expression value is 0, the variable field is BO. 

If the Bl=l instruction has been assembled prior to this instruction and the 
expression value is 1, 2, or -1, the variable field of the instruction is Bl, 
Bl+Bl, or -Bl, respectively. 

If the B7=l instruction has been assembled prior to this instruction and the 
expression value is 1, 2, or -1, the variable field for the instruction is B7, 
B7+B7, or -B7, respectively. 

In all other cases, the variable field is the register or value indicated by the 
expression. 

Examples: 


1. R= used with Bl=l 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


" .-.J 

18 130 



Bi-1 

R= 

-!- 

B3,? 1 

66311 

61300D0QB3 


\ :• ■■■ w * 

SB3 

R= 

B1*B1 tUi | 

B3,3 

3 * 1 


2. R= used with Bl^l 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

] 


11 

"l8 Tio 


T AG 

R= 

X5,-i 

715077/776 


T & 

SX5 

-i ! 
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3. Expression is same as register designator: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


RFG 

MICRO 

R= 

R* - 

1 »» *R5* 1 

B5,*REG* 

asisiiisii 


No instruction is generated; SB5 B5 would be a no operation instruction. 

4.8.8 REP, REPC, AND REPI - GENERATE LOADER REPLICATION TABLE 

The REP, REPC, and REPI instructions cause the assembler to generate an REPL loader table so 
that when the subprogram being assembled is loaded, the loader will load one or more copies of a 
data sequence. For the REPI instruction, the loader generates the copies immediately upon encoun¬ 
tering the table; for REP, the replication takes place at the end of loading. For RE PC + the loader 
ignores the REPL table if the destination data address is in a common block that was first declared 
by a previously loaded subprogram; otherwise, the loader generates the copies immediately upon 
encountering the tables. 

Replication of object code is valid in relocatable assemblies only. It is particularly useful for setting 
one or more blocks of storage to a given series of values or for generating tables. 

Data to be replicated must not contain any external references or common block relocatable addresses. 
For REPC and REPI, data must be inpreviously assembled text. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


REP 

REPC t 
REPI 

S/saddr, D/daddr, C/rep, B/bsz, I/inc 


A location field symbol, if present, is ignored. 

The variable field subfields can be in any order. 

S/saddr Relocatable expression specifying first word address of code to be copied. 

The S/saddr subfield must be provided. If it is zero, or omitted, the assembler 
flags the instruction as erroneous and does not generate an REPL loader table. 

D/daddr Relocatable expression specifying the destination of the first word of the first 

copy. If D/daddr is omitted, the assembler sets daddr to zero, and, when 
daddr is zero, the loader uses saddr plus bsz for the destination address. 

Note that room for the repeated data must be reserved in the destination block. 


T Not supported by SCOPE 2 Loader. 
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C/rep 


B/bsz 


i/inc 


Absolute expression specifying the number of times code is to be copied. When 
base is M, COMPASS assumes that rep is a decimal value. If C/rep is 
omitted, the assembler sets rep to zero. When rep is zero or one, the loader 
makes one copy. 

Absolute egression specifying the number of words to be copied (block size). 
When base is M, COMPASS assumes that bsz is decimal. 

If B/bsz is omitted, the assembler sets bsz to zero. When bsz is zero or one, 
the loader copies one word. 

Absolute expression specifying the increment size in words. When base is M, 
COMPASS assumes that inc is in decimal. 

The increment size is the number of words between the first word of each copy. 
When inc is zero or omitted, the loader uses bsz as the increment size. The 
loader writes the first copy starting at daddr, the second starting at daddr+inc, 
the third at daddr + 2 x inc, etc. until the rep count is exhausted. 


The origin and location counters for the block containing the daddr are not advanced by a value of 
inc x rep. Storage reservation for replicated code is the responsibility of the user. 


Rules for replication: 

1. The S subfield cannot be omitted 

2. Room must be reserved for the copies in the destination block (for example, through 
ORG, ORGC, or BSS) 

3. REP, REPC, and REPI can be used in relocatable assemblies only 

4. Data to be replicated must not contain any external references or common block relocatable 
addresses 

5. For REPC and REPI, data must be in previously loaded text 


Example: 


Location 

Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


10 


p r 

= 

io ; 





USE 

NEW" ! 

5017 

00000000000000000015 


86 

na T A 

16,20,70703,1,5,3.14 

5Q20 

00000000000000000020 




1 

5 021 

00000000000000007070 





502? 

00000000000000000001 




1 

5023 

0000000^000000000005 




1 

6024 

17216300000000000000 




1 


13 


I 

FQU 

*-PA +6 





USE 

DRLOCK 

5251 



DC 

PSS 

RC*T 1 





USE 

♦ 1 





PFPI 

s/pa,o/na,p/i-5,c/RC,i/i 
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4.9 CONDITIONAL ASSEMBLY 


The following pseudo instructions permit optional assembly or skipping of source code. A special form, 
SKIP, causes unconditional skipping. COMPASS provides IF test instructions that: 

Test for assembly environment (IFtype) 

Compare values of two expressions (IFop) 

Compare values of two character strings (IFC) 

Test the attribute of a single symbol or an expression (IF) 

Test the sign of an expression (IFPL and IFMI) 

Immediately following the test instruction are instructions that are assembled when the tested condition 
is true and skipped when the condition is false. Skipping is terminated either by a source statement 
count on the IF instruction, or by an ENDIF, an ELSE, or an END. 


The statement count, when used, is decremented for instruction lines only; comment lines (identified by 
* in column one) are not counted. Determining the IF range with a statement count produces slightly 
faster assembly than using the ENDIF. 

The results of an IF test are determined by the values of expressions in pass one; the value of a 
relocatable symbol is relative to the USE block in which it was defined. The value of an external symbol 
is 0 if the symbol was declared as external. If the symbol was defined relative to a declared external, 
the value is the relative value. 


4.9.1 ENDIF - END OF IF RANGE 

An ENDIF causes skipping to terminate and assembly to resume. When the sequence containing the 
ENDIF is being assembled, or is controlled by a statement count, the ENDIF has no effect other than 
to be included in the count. 

Skipped instructions such as macro references are not expanded. Thus, any ENDIF that would have 
resulted from an expansion is not detected. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

ifname 

ENDIF 



ifname Name of an IF, SKIP, or ELSE sequence; or blank, ifname can be used as any 

other type of symbol elsewhere in the program. 

Skipping of a sequence initiated by an IF, SKIP, or ELSE that is assigned a name can be terminated 
by an ENDIF specifying the sequence by name, or by any unnamed ENDIF. Any ENDIF terminates 
skipping of an unnamed sequence that is not controlled by a source line count. A named ENDIF 
terminates the named IF, SKIP, or ELSE and any unnamed IF, SKIP, or ELSE sequences in effect 
that are not under line count control. 
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4.9.2 ELSE - REVERSE EFFECTS OF IF 


Through the ELSE instruction, COMPASS provides the facility to reverse the effects of an IF test 
within the IF range. An ELSE detected during skipping causes assembly to resume at the instruction 
following the ELSE. An ELSE detected while a sequence is being assembled initiates skipping of source 
code following the ELSE. Skipping continues until: 

1. A statement count specified on the ELSE is exhausted 

2. A second ELSE is detected for the sequence 

3. An ENDIF is detected for the sequence 
Format: 


LOCATION 

OPERATION 

---—- 

VARIABLE SUBFIEIDS 

ifname 

ELSE 

fnct 


ifname Name of an IF, SKIP, or ELSE sequence, or blank. 

fnct Optional absolute evaluatable expression specifying integer number of source 

lines to be skipped. It has no effect if the ELSE resumes assembly. When the 
base is M, COMPASS assumes that fnct is decimal. 

An ELSE specifying the sequence by name or any unnamed ELSE terminates skipping of a sequence 
initiated by an IF, SKIP, or an ELSE that has an assigned name. Skipped instructions such as macro 
references are not expanded; any ELSE that would have resulted from the expansion is not detected. 


4.9.3 IFTYPE - TEST OBJECT PROCESSOR TYPE 

IFtype pseudo instructions test for the type of processor that will execute the object program, as 
declared by MACHINE, and PERIPH or PPU pseudo instructions. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

ifname 

IFtype 

fnct 
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ifname 


Optional 1-8 character name. 


type Mnemonic specifying type of object processor. 

Type Condition Causing Assembly 

CP Any central processor unit 

CP6 Neither PERIPH nor PPU nor MACHINE 7 has been specified. 

CPU code Ls assembled for a CYBER 170 Series, CYBER 70/ 
Model 71, 72, 73, or 74 or 6000 Series Computer System. 

CP7 Neither PERIPH nor PPU nor MACHINE 6 has been specified. 

That is, CPU code is assembled for a CYBER 70/Model 76 
or a 7600 Computer System. 

PP Any peripheral processor unit 

PP6 One of the following is true: 

1. PERIPH has been specified but MACHINE 7 has not 
been specified. 

2. PPU and MACHINE 6 have both been specified. PPU 
code is assembled for a CYBER 170 Series, CYBER 
70/Model 71, 72, 73, or 74 or a 6000 Series Computer 
System. 

PP7 One of the following is true: 

1. PPU has been specified but MACHINE 6 has not 
been specified. 

2. PERIPH and MACHINE 7 have both been specified. 

That is, PPU code is assembled for a CYBER 70/ 
Model 76 or a 7600 Computer System. 


fnct Optional absolute evaluatable expression specifying an integer count of the 

number of statements to be skipped. When base is M, COMPASS assumes 
that £nct is decimal. 

The ifname and jjnct parameters are related as follows: 

1. If a count is supplied, it takes precedence over any ENDIF but not over an ELSE. The only 
effect of an ENDIF in a count controlled sequence is to be included in the count. Skipping 
terminates when the count is exhausted or when an ELSE with a matching or blank name is 
encountered, whichever occurs first. 

2. If neither a count nor a name is supplied, the IF range is terminated by an ENDIF, whether 
named or unnamed, or by an unnamed ELSE, whichever is encountered first. A named ELSE 
has no effect. 
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3. If a name but no count is supplied, the IF range is terminated by an ENDIF or ELSE with a 
matching name or by an unnamed ENDIF or ELSE. An ENDIF or ELSE with a name that 
does not match has no effect. 


Example: 


Code Generated 


0 

173 G130GQQ0QC 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

I 


11 

18 

1 30 







ITENT 

MACHIM! 

XYZ 

6 

1 

1 



BSS 

IFCPft 

XJ 

ELSE 

NJ 

123 

2 

0 

1 

0 

1 

1 

1 

1 

1 

1 


4.9.4 IFOP- COMPARE EXPRESSION VALUES 

An I Fop pseudo instruction compares the values of two expressions according to the relational 
mnemonic specified and assembles instructions in the IF range when the comparison is satisfied. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

ifname 

I Fop 

expj, exp 2 , fnct 


ifname Optional 1-8 character name 


op Specifies comparative test: 

op Condition causing assembly 

EQ Equality, the expressions are equal in all respects. That is,they 

not only have the same numeric value but have the same attributes 
as well. For example, both are names that are common 
relocatable, or absolute,or external, etc. 

NE Inequality, the expressions are not equal in all respects. They 

differ in value or in some attribute. 

GT The first expression is greater in value than the second expression 

No other attributes are tested. 
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GE The first expression is greater than or equal in value to the second 

expression. No other attributes are tested. 

LT The first expression is less in value than the second expression. 

No other attributes are tested. 

LE The first expression is less than or equal in value to the 

second expression. No other attributes are tested. 

For these tests, positive zero and negative zero are equal. 

exp. An expression. When the value of exp is tested, exp can include only previously 

defined symbols and the result can be absolute, relocatable, or external. If an 
undefined symbol is used, the expression value is set to zero, the IF instruction 
is flagged as erroneous, and assembly continues with the next instruction. 

fnct Optional absolute evaluatable expression specifying an integer count of the 

number of statements to be skipped. When base is M, COMPASS assumes 
that fnct is decimal. When fnct is blank, the comma can be omitted. 

The ifname and fnct parameters are related as follows: 

1. If a count is supplied, it takes precedence over any ENDIF but not over an ELSE. The only 
effect of an ENDIF in a count controlled sequence is to be included in the count. Skipping 
terminates when the count is exhausted or when an ELSE with a matching or blank name is 
encountered, whichever occurs first. 

2. If neither a count nor a name is supplied, the IF range is terminated by an ENDIF, whether 
named or unnamed, or by an unnamed ELSE, whichever is encountered first. A named ELSE 
has no effect. 

3. If a name but no count is supplied, the IF range is terminated by an ENDIF or ELSE with a 
matching name or by an unnamed ENDIF or ELSE. An ENDIF or ELSE with a name that 
does not match has no effect. 

Example: 

A demonstration of one use of IF statements in a PPU program: 



LOCATION 

OPERATION 

VARIA81E COMMENTS 

1 

* 

II 

18 130 



IF 

OEF,LQGP 



IFlT 

*-L00P,4QB 



2JN 

LOOP 



ELSE 

2 



NJN 

* + 3 



LJM 

LOOP 



• 




• 




• 



This code assembles a zero jump to the symbol LOOP if LOOP has been defined witnin 37 _ words (the 
range of a short jump) prior to the occurrence of this code. Otherwise, the NJN and LJM are assembled. 
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4.9.5 IFPL AND IFMI -TEST SIGN OF EXPRESSION 


The IFPL and IFMI pseudo instructions test the sign of an expression and assemble instructions in 
the IF range according to whether the sign of the value is plus (PL) or minus (MI). The pseudo 
instructions allow positive zero to be distinguished from negative zero. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

ifname 

IFPL 

exp, met 

ifname 

IFMI 

exp,fact 


ifname Optional 1-8 character name 


exp An expression. It can include only previously defined symbols and the result 

can be absolute, relocatable, or external. If an undefined symbol is used, the 
instruction is flagged as erroneous and assembly continues with the next 
instruction. 

fnet Optional absolute expression specifying an integer count of the number of 

statements to be skipped. When base is M, COMPASS assumes that met is 
decimal. When met is blank, the comma can be omitted. 

The ifname and met parameters are related as follows: 

1. If a count is supplied, it takes precedence over any ENDIF but not over an ELSE. The only 
effect of an ENDIF in a count controlled sequence is to be included in the count. Skipping 
terminates when the count is exhausted or when an ELSE with a matching or blank name is 
encountered, whichever occurs first. 

2. If neither a count nor a name is supplied, the IF range is terminated by an ENDIF, whether 
named or unnamed, or by an unnamed ELSE, whichever is encountered first. A named ELSE 
has no effect. 

3. If a name but no count is supplied, the IF range is terminated by an ENDIF or ELSE with a 
matching name or by an unnamed ENDIF or ELSE. An ENDIF or ELSE with a name that does 
not match has no effect. 

The condition tested for by IFPL is satisfied if the value of exp is greater than or equal to plus zero; 
the condition for IFMI is satisfied if the value of exp is less than or equal to minus zero. 
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Example: 


The following opdef defines the CPU instruction MXi jk so that the address value is 60 if the expression 
value is negative zero or a positive non-zero multiple of 60, otherwise it is the address expression 
value modulo 60. 



Example of call: 


43610 



4.9.6 IF - TEST SYMBOL OR EXPRESSION ATTRIBUTE 

The IF pseudo instruction tests a symbol or an expression for a specific attribute and assembles 
instructions in the IF range if the test is satisfied. 
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Format: 


LOCATION 

OPERATION 

VARIABLE SUBPIELDS 

ifname 

IF 

att,exp,jfnct 

ifname 

Optional 

1-8 character name 


att 

Specifies attribute test. A minus prefix to the attribute causes assembly on 
the false rather than the true condition. 


att 

Condition causing assembly 


SET 

The symbol given in the second subfield was defined by a SET, 
MAX, MIN, or MICCNT 


-SET 

The symbol given in the second subfield was defined other than 
by a SET, MAX, MIN, or MICCNT 


ABS 

The expression in the second subfield reduces to a value that is 
not relocatable or external 


-ABS 

The expression in the second subfield reduces to either a 
relocatable or an external address 


REL 

The expression in the second subfield reduces to a local or 
common relocatable address 


-REL 

The expression in the second subfield does not reduce to a local 
or common relocatable address 


REG 

The expression in the second subfield contains one or more 
register names 


-REG 

The expression in the second subfield does not contain a register 
name 


COM 

The expression in the second subfield reduces to a common re¬ 
locatable address (any blank or labeled common block) 


-COM 

The egression in the second subfield is not a common relocatable 
address (any blank or labeled common block) 


EXT 

The expression in the second subfield contains one or more 
external symbols 


-EXT 

The egression in the second subfield does not contain an 
external symbol 


LCM 

The expression reduces to an LCM address 


-LCM 

The expression does not reduce to an LCM address 


LOC 

The expression reduces to a program relocatable address 


-LOC 

The expression does not reduce to a program relocatable address 
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DEF All the symbols in the expression in the second subfield are 

defined 

-DEF One or more of the symbols in the expression in the second 

subfield is undefined 

MAC The name in the second subfield is an opcode name 

-MAC The name in the second subfield does not contain an opcode name 

MIC The name in the second subfield is a micro 

-MIC The second subfield does not contain a micro name 

SST The second subfield contains a system symbol 

-SST The second subfield does not contain a system symbol 

exp For SET, SST, -SET, and -SST, exp must be a single defined symbol. For 

MIC and -MIC, exp must be a name. For any other test, it is an expression. 
The expression can include symbols as yet undefined if att is DEF, -DEF, REG, 
-REG, EXT, or -EXT only. If an undefined symbol is used with any other 
attribute, the express ion value is set to zero, the instruction is flagged as 
erroneous, and assembly continues with the next instruction. Note that if 
a symbol is never defined conventionally but only by use of =S or =X prefix 
(see section 2.4.2), COMPASS does not define the symbol until the end of 
the assembly, and IF tests will consider the symbol undefined. 

fnct Optional absolute evaluatable expression specifying an integer count of the 

number of statements to be skipped. When base is M, COMPASS assumes 
that fnct is decimal. When fnct is blank, the comma can be omitted. 

The ifname and fnct parameters are related as follows: 

1. If a count is supplied, it takes precedence over any ENDIF but not over an ELSE. The only 
effect of an ENDIF in a count controlled sequence is to be included in the count. Skipping 
terminates when the count is exhausted or when an ELSE with a matching or blank name is en¬ 
countered, whichever occurs first. 

2. If neither a count nor a name is supplied, the IF range is terminated by an ENDIF, whether 
named or unnamed, or by an unnamed ELSE, whichever is encountered first. A named ELSE 
has no effect. 

3. If a name but no count is supplied, the IF range is terminated by an ENDIF or ELSE with a 
matching name or by an unnamed ENDIF or ELSE. An ENDIF or ELSE with a name that does 
not match has no effect. 
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Examples 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


ABLE 

BSS 

20 [ 


• 

• 

• i 


• 

• 

• . 


- • 

• 

• 


TEST 

IE 

REl,ABLE+15 


• 

• 

• 


• 

• 

• . 


• 

• 



TEST 

ENOIF 

IF 

1 

COM,OTA,2 ERRONEOUS, OTA AS YET UNDEFINED 



• 

• i 



• 

• } 



• 

* I 



USE 

// l 


OTA 

BSS 

i ! 

1 


4.9.7 IFC - COMPARE CHARACTER STRINGS 


The IFC pseudo instruction compares two character strings according to the operator specified 
and assembles instructions in the IF range if the comparison is satisfied. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

ifname 

IFC 

op, dstring 1 dstring 2 d, fnct 


ifname Optional 1-8 character name 

d Delimiting character. Characters between the first and second occurrence of this 

character constitute the first character string; characters between the second and 
third occurrence constitute the second character string. 

op Specifies comparative test: 


op 

Condition causing assembly 

EQ or -NE 

stringy has the same value as stringy 

NE or -EQ 

stringy does not equal stringg 

GT or -LE 

string is greater than string 


4-66 


60492600A 









GE or-LT 


stringy i s greater than or equal to string 

z 

LT or -GE stringy is less than string 2 

LE or -GT stringy is less than or equal to stringg 

string. Character string. When IFC is within a macro definition, each character string 

can be a formal parameter. 

£nct Optional absolute evaluatable expression specifying an integer count of the number 

of statements to be skipped. When base is M, COMPASS assumes that fnct is 
decimal. When fnct is blank, the comma can be omitted. 

The ifname and fnct parameters are related as follows: 

1. If a count is supplied, it takes precedence over any ENDIF but not over an ELSE. The only 
effect of an ENDIF in a count controlled sequence is to be included in the count. Skipping 
terminates when the count is exhausted or when an ELSE with a matching or blank name is 
encountered, whichever occurs first. 

2. If neither a count nor a name is supplied, the IF range is terminated by an ENDIF, whether 
named or unnamed, or by an unnamed ELSE, whichever is encountered first. A named ELSE 
has no effect. 

3. If a name but no count is supplied, the IF range is terminated by an ENDIF or ELSE with a 
matching name or by an unnamed ENDIF or ELSE. An ENDIF or ELSE with a name that does 
not match has no effect 

Each character in stringy is compared with the corresponding character in string 2 progressing from 
left to right until an inequality is found or both strings are exhausted. When one string is shorter than 
the other, it is padded with a character that has a value less than any other character in the string. 

The truth condition is based on the relative magnitudes of the characters in the strings. 

Examples: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


II 

16 

30 






TFST1 

IFC 

ECUS ABCS ABCS 

ABC EQUALS ABC 


TEST2 

IFC 

LT,*AB*ABC* 

AB IS LESS THAN ABC 


TFST3 

IFC 

GT * XAXX 

A IS GREATER THAN NULL 



IFC 

-G£,*Z*8*,3 

Z IS LESS THAN 8 


The IFC in the following example checks for an empty parameter string. 
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— 

LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


•n 

18 130 

— 

XX 

MACRO 

Pi,P2 1 



IFC 

FQ,**P2*,1 1 


p 

ERR 

• 

1 FI AG EPROR 



• 

ENDM 



The following example illustrates a character string terminated incorrectly. When COMPASS reaches 
end of statement without finding a third asterisk, the asterisk omitted following PI causes an error flag. 


I 

LOCATION 

OPERATION 

VARIABLE COMMENTS 

D 


H 

18 |30 

n 


IFC 

EQ,*00*P1,2SP2 


4.9.8 SKIP - UNCONDITIONALLY SKIP CODE 

The SKIP instruction causes COMPASS to unconditionally skip the instructions in the SKIP range. 
It resembles an IF for which there is no true condition. 

Format 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

ifname 

SKIP 

fnct 


ifname Optional 1-8 character name 

fnct Optional absolute evaluatable expression specifying an integer count of the number 

of statements to be skipped. When base is M, COMPASS assumes that fnct is 
decimal. 

The ifname and fnct parameters are related as follows: 

1. If a count is supplied, it takes precedence over any ENDIF but not over an ELSE. The only 
effect of an ENDIF in a count controlled sequence is to be included in the count. Skipping 
terminates when the count is exhausted or when an ELSE with a matching or blank name is 
encountered, whichever occurs first. 


4-68 


60492600A 














2. If neither a count nor a name is supplied, the SKIP range is terminated by an ENDIF, whether 
named or unnamed, or by an unnamed ELSE, whichever is encountered first. A named E LS E 
has no effect. 

3. If a name but no count is supplied, the SKIP range is terminated by an ENDIF or ELSE with 
a matching name or by an unnamed ENDIF or ELSE. An ENDIF or ELSE with a name that 
does not match has no effect. 


4.10 ERROR CONTROL 

The ERR and ERRxx pseudo instructions described in this section either conditionally or unconditionally 
set an error flag. 


4.10.1 ERR - UNCONDITIONALLY SET ERROR FLAG 

An ERR pseudo instruction produces an assembly error but does not affect other code. Usually, it is 
used in conjunction with a conditional assembly pseudo instruction to force an error into the assembly 
based on an assembly time test. One application is to use a test and ERR to detect illegal macro 
parameters. 


Format: 


LOCATION 

OPERATION 

VARIABLE SU8FIELDS 

flag 

ERR 



flag A single alphanumeric character denoting the error type. The flag is placed 

in the listing to the left of the line for ERR. The flag can denote a fatal or 
nonfatal error. A fatal error causes COMPASS to suppress generation of the 
binary deck unless the D mode option is selected on the COMPASS control 
card. If no flag is specified, or the character is not one of those given in 
section 11.7, COMPASS uses P. 

A variable field entry, if present, is ignored. 


Example: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

J 


11 

18 130 


NNN 

MACRO 

PI»P2»P3 »P4 i 



IFEQ 

P1.0 | 


A 

ERR 




• 

• 



• 

• | 



• 

• j 



ENOM 

I 

1 



• 

• ' 



• 

• | 



m 

• . 



NNN 

0,A,8,C 1 
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4.10.2 ERRxx - CONDITIONALLY SET ERROR FLAG 

An ERRxx pseudo instruction produces an assembly error when a condition detected during the second 
pass of the assembler is true. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

flag 

ERRxx 

aexp 


flag A single alphanumeric character denoting the error type. The flag is placed 

in the listing to the left of the line for ERR. The flag can denote a fatal or 
nonfatal error. A fatal error causes COMPASS to suppress generation of the 
binary deck unless the D mode option is selected on the COMPASS control card. 
If no flag is specified, or the character is not one of those given in section 11.7, 
COMPASS uses P. 

xx Defines condition under which aexp value is erroneous. 


XX 

Error Condition 

NG or MI 

Value of expression is negative 

NZ 

Value of expression is nonzero 

PL 

Value of expression is positive 

ZR 

Value of expression is zero 


aexp Absolute expression. It cannot contain external symbols or references to blank 

common. The test is made in pass two of the assembler. Relocatable addresses 
are assigned values relative to program origin rather than to the block in which 
they are defined. 

NOTE 

ERRxx is the only conditional instruction for which the 
test is made in pass two. Therefore, this is the only 
pseudo instruction that can be used to determine PPU 
overflow if the PPU program has literals and USE 
blocks. 

Example: 

Test for memory overflow in PPU assembly 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

7447 

7777447 

7462 

± 


1! 

IB 130 


LASTTAG 

R 

PERIPH 

• 

• 

ess 

ERRPL 

END 

- 1 - 

1 

, 1 

LASTTAG-7777) 

1 
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4.11 LISTING CONTROL 


The instructions described in this section permit extensive control of the assembly listing format. 


4.11.1 LIST-SELECT LIST OPTIONS 

The LIST pseudo instruction controls the content and format of the assembler listing. LIST instructions 
are disabled under either of the following conditions: 

When the list parameter (L) on the COMPASS control statement (section 10.1.2) is zero, or 

When the list option parameter (LO) on the COMPASS control statement is used and is other 
than LO=0. 


Use of the LIST pseudo instruction is optional. If it is not used in the subprogram, COMPASS list 
output is according to the L and LO parameters on the COMPASS control statement. If the LO parameter 
is omitted or LO=0, the list options are as if L, B, N, and R only are selected and the listing contains 
heading information, assembly text, assembler statistics, an error directory (upon occurrence of an 
error only), and a symbolic reference table. Formats of this output are described in detail in 
chapter 11 and brief summaries are given below. 


Heading information 


Program length, origin, and length of each block, entry points 
and external symbols. 


Assembly text 


Assembler statistics 


Line, and assembly results of each line assembled (not skipped) 
from the input device (excludes code generated by RMT, DUP, 
ECHO, XTEXT, or a macro or opdef expansion). For data 
generating pseudo instructions DATA, DIS, BSSZ that produce 
more than one word of object code, only the first word is listed. 
For VFD and CON all words of object code are listed. For R=, 
only the pseudo instruction is listed. 

Each occurrence of the LIST instruction is listed. 

Amount of storage used, counts of assembled statements, 
defined symbols, invented symbols, and references to symbols. 


Error directory 


Lists fatal and nonfatal errors and summarizes the causes of each. 


Symbolic reference table List of all symbols defined in the program according to symbol 

qualifier, if any, followed by an index to every reference to the 
symbol in the listed statements. 


Formats: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


LIST 

op-j^ f ®p2* • • •» 


or 


LIST 

* 
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A location field symbol, if present, is ignored. 

°Pj A list option represented by a single letter or a letter prefixed by a minus sign. 

The unprefixed letter selects the option; the prefixed letter cancels the option. 
Options are separated by commas and terminated by a blank. 

A List statements actually assembled 

When A is not selected, a line containing concatenation and micro substi¬ 
tution marks is listed with the marks in it exactly as presented to the 
assembler. When the A option is selected, however, the assembler lists 
the line before and after the editing takes place. Selecting A also causes 
the listing of lines of code resulting from the R= pseudo instruction. 

B List binary control statements 

When B is selected, the listing includes SEG, SEGMENT, IDENT, and 
END pseudo instructions. 

C List listing control statements 

When C is selected, the listing includes EJECT, SPACE, TTL, and 
TITLE pseudo instructions. A listing instruction that causes an EJECT 
is listed as the first line of the new page after the EJECT takes place 

D Include details 

Selection of the D option causes listing of the following items not normally 
listed: 

Second and subsequent lines of DATA and DIS 

Code assembled remotely when HERE or END causes its assembly 
Literals block 
Default symbols 

E Include echoed lines 

Selection of E causes listing of all iterations of code duplicated as a result 
of DUP and ECHO. 

F List IF-skipped lines 

When F is selected, the listing includes all lines skipped by IF, IFop, 

IFC, IFPP, IFCP, SKIP, and ELSE. In addition, the Symbolic Reference 
Table contains references to symbols in IF statements. 

G List generated code 

Selection of this option causes listing of all code generating lines regardless 
of list controls other than L. Instructions listed include symbolic machine 
instructions and BSS, BSSZ, CON, DATA, DIS, R=, and VFD. 

L Master list control 

This option is normally selected. When L is canceled, the long list contains 
error flagged lines, an error directory, and LIST and END pseudo instruc¬ 
tions only, regardless of selection of any other options on LIST. 

M List macros and opdefs 

Selection of M causes all lines generated by calls to macros and opdefs other 
than those defined by the system to be listed. 
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N List nonreferenced symbols 

This option is normally selected. Cancellation of this option causes 
any nonsystem symbol for which no reference has been accumulated 
(e. g., all occurrences are in IF statements with the F option deselected, 
or are between CTEXT or ENDX with the X option deselected) to be 
omitted from the symbolic reference table. 

R Accumulate and List references 

This option is normally selected. When R is canceled, COMPASS does 
not accumulate references. R should not be canceled if a complete 
symbolic reference table is desired. If R is canceled at the end of 
assembly, no symbolic reference table is produced. 

S List systems macros and opdefs 

Selection of S causes all lines generated by calls to systems-defined 
macros and opdefs to be listed. 

T List nonreferenced system symbols 

Selection of this option causes a symbol defined through SST to be 
included in the symbolic reference table even if there are no accumulated 
references. 

X List XTEXT lines 

Selection of the X option causes listing of all statements assembled as a 
result of an XTEXT pseudo instruction. CTEXT and ENDX provide a 
means of alternately turning this external designator off and on. 

$ A dollar sign in the variable field selects all options. 

* An asterisk in the variable field causes selection of the options in effect prior 

to the current selection. The assembler records occurrences of LIST pseudo 
instructions and maintains a table of the most recent 50 occurrences. Each 
LIST * resumes use of the most recent entry and removes it from the list. 
When the subprogram contains more LIST * instructions than there are entries 
in the stack, COMPASS selects the default list options (B, L, N, and R). 


For list options A, C, D, E, F, M, S, and X, all applicable options must be selected for a specific 
line to be listed. For example, listing of an expansion resulting from a DUP within a macro requires 
selection of both M and E. Similarly, an expansion caused by an XTEXT within a system macro call is 
listed only when both X and S are selected. To obtain a listing showing pand ^ marks removed from 
external text inside a DUP range, A, X, and E must all be selected. 


Example: 


0 17205146314631463146 

2 17205146314631463146 

3 16403146314631463146 

4 17205146314631463146 

6 17205146314631463146 

7 16403146314631463146 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

± 


II 

18 130 



LIST 

A ! 



DATA 

1 • 3i*EE ' 



DATA 

1.3EE 



LIST 

D 1 



DATA 

1.3<*E£ 1 



DATA 

1.3EE | 



LIST 

”A ,-0 | 



UAJ A 

1 • 3r*EE j 



LIST 

* 



DATA 

1.3-EE tt ; 



DATA 

1.3EE 
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4.11.2 EJECT—EJECT PAGE AND BEGIN NEW SUB-SUBTITLE 

The EJECT pseudo Instruction advances printer paper to a new page before printing. Then, page 
headings are printed and listing continues. EJECT has no effect, other than setting the sub-subtitle, 
if it is generated by DUP, ECHO, RMT, XTEXT, or a macro or opdef expansion, and die cor¬ 
responding LIST options are not all selected. 

Format: 


IOCATION 

OPERATION 

VARIA8LE SUBFIELDS 

name 

EJECT 



name New program sub-subtitle for the page will be printed in character positions 

70-79 of the second line of the page. A blank name clears the sub-subtitle. 

An entry in the variable field, if present, is ignored. 


4.11.3 SPACE-SKIP LINES AND BEGIN NEW SUB-SUBTITLE 

The SPACE pseudo instruction spaces the assembler listing. When a page is full, an eject occurs 
and listing resumes on the next page. A SPACE immediately following an EJECT is ignored. SPACE 
has no effect, other than setting the sub-subtitle, if it is generated by a DUP, ECHO, RMT, 
XTEXT, or a macro or opdef expansion, and the corresponding LIST options are not all selected. 


IOCATION 

OPERATION 

VARIABLE SUBFIELDS 

name 

SPACE 

sent, rent 


name New subprogram sub-subtitle will be printed in characters 70-79 on the second 

line of the next page heading. A blank name clears the sub-subtitle. 

sent An absolute expression specifying a positive integer number of spaces between 

the most recent line and the next line of printout. If base is M, sent is assumed 
to be decimal. If sent is omitted or zero, no line is skipped. 

rent An absolute egression specifying a positive integer number of lines that must 

be remaining on the page following spacing. If base is M, rent is assumed to 
be decimal. 

If sent + rent exceeds the number of lines on the page before spacing occurs, the SPACE acts like an 

EJECT. Note that either the eject occurs or the number of spaces are skipped but not both. 

Blank cards or statements can also be used to space the listing. 
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4.11.4 TITLE - ASSEMBLY LISTING TITLE 


The first TITLE pseudo instruction establishes the title that will be printed on each page of the listing. 

A subsequent TITLE instruction generates a subtitle and causes a page eject. If the subprogram does not 
include a TITLE instruction, COMPASS prints the variable field of the first EDENT pseudo instruction 
as the title. A TITLE instruction without a character string produces an untitled listing. A name in 
the location field introduces a new subprogram sub-subtitle. 

A TITLE instruction has no effect when LIST option X is deselected and the TITLE instruction is 
in text read by XTEXT or is between CTEXT and ENDX instructions. All other TITLE instructions 
(except the first which sets the main title) cause a page eject, even when generated by a macro 
expansion, unless LIST option L is deselected. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

name 

TITLE 

string 


name New subprogram sub-subtitle to be printed in character positions 70-79 

on the second line of the page. A blank name clears the sub-subtitle. 

string COMPASS searches the columns following the blank that terminates the 

operation field. If it does not find a nonblank character before the default 
comments column (see COL pseudo instruction), it takes the characters 
starting with the default comments column minus one up to the end of the 
statement. Otherwise, the title or subtitle begins with the first nonblank 
character following TITLE and continues to the end of the statement or to 
62 characters. Any characters beyond the 62nd are lost. A blank string 
produces an untitled listing. 

Example: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


1! 

18 130 







ioent 

MTD ; 



LIST 

C i 



TITLE 

MT DRIVER l 



• 




• 

| 



• 

l 



TITLE 

I/O R0UTINES| 



• 

1 



• 

1 
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First page: 


MT DRIVER 


Subsequent pages: MT DRIVER 

I/O ROUTINES 


4.11.5 TTL-NEW ASSEMBLY LISTING TITLE 

The TTL pseudo instruction introduces a new main title to be printed on each page of the listing, and 
clears the subtitle. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

name 

TTL 

string 


name New sub-subtitle to be printed in character positions 70-79 on the second 

line of the pages. A blank name clears the sub-subtitle. 

string COMPASS searches the columns following the blank that terminates the operating 

field. If it does not find a nonblank character before the default comments column 
(see COL pseudo instruction), it takes the characters starting with the default 
comments column minus one up to the statement end. Otherwise, the title begins 
with the first nonblank character following TTL and continues to the end of the 
statement or to the 62nd character. Any characters beyond the 62nd are lost. 

A blank string produces an untitled listing. 

TTL does not cause a page eject. 


4.11.6 NOREF-OMIT SYMBOL REFERENCES 

The NOREF pseudo instruction causes the symbols named in the variable field to be suppressed from 
the symbolic reference table. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


NOREF 

symj, sym 2 ,..., sym Q 


sym. One or more symbols defined in the subprogram. If a symbol qualifier is in 

1 effect when the NOREF is encountered, the symbols are assumed to be 

qualified by the qualifier in use, unless an unqualified symbol of that name 
is defined before the NOREF and the qualified symbol is not defined before 
the NOREF. Alternatively, sym. , can be a nonblank qualifier symbol en¬ 
closed by slant bars, /qualifier/, in which case all symbols qualified by 
the specified qualifier are suppressed from the symbolic reference table. 

A location field symbol, if present, is ignored. 
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4.11.7 CTEXT AND ENDX - DISABLE/ENABLE LISTING OF COMMON DECK TEXT 

The CTEXT pseudo instruction sets the XTEXT flag for list control. 

NOTE 

When the flag is set, external text is listed and symbol 
references are recorded, only if the X list option is selected. 


Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELOS 

name 

CTEXT 

string 


If X list option is selected, name is treated as a sub-subtitle; other¬ 
wise it is ignored. 

If the variable field is nonblank and the Xlist option is selected, the CTEXT 
is treated as a subtitle. The CTEXT instruction generates a subtitle and 
causes a page eject. If X is not selected, the CTEXT does not affect titling. 

The subtitle begins with the first nonblank character following CTEXT 
or in the default comments column (see COL pseudo instruction) minus 
one, whichever comes first, and continues to the end of the statement 
or to 62 characters. Any characters beyond the 62nd are lost. 

The ENDX pseudo instruction clears the XTEXT flag for list control and causes listing to resume, 
starting with the instruction after ENDX, when the X list option has not been selected. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELOS 


ENDX 



Entries in the location field or variable field, if present, are ignored. 


name 

string 
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4.11.8 XREF—REFERENCE SYMBOLIC ADDRESS 

The XREF pseudo instruction provides the options of having the symbolic reference table contain 
references to symbols according to (1) location counter address, (2) page and line number, or (3) both. 
For the format of the symbolic reference table, refer to section 11.8. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


XREF 

string 


string An optional character string, the first character of which indicates how symbols 

are to be referenced. 

A The symbolic reference table lists addresses only. Flags are not included. 

B The symbolic reference table lists references to symbols according to 
page number, line, and address. Flags are included. 

P The symbolic reference table lists references to symbols according to 
page and line numbers. Flags are included. 

A location field symbol, if present, is ignored. 

If the string is omitted or if no XREF is issued, the symbolic reference table contains references 
according to page and line numbers and includes flags. The last XREF encountered in a subprogram 
determines the form of the listing for the entire subprogram. 
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DEFINITION OPERATIONS 


5 


This chapter describes pseudo instructions that involve definition operations. These pseudo 
instructions cause sequences of instructions to be saved for these reasons: 

They can be assembled from an external source (XTEXT). 

Assembly can be delayed until later in the subprogram (RMT). 

They can be assembled repeatedly (DUP and ECHO). 

They can be referred to for assembly (MACRO, MACROE or OPDEF). 

Any instructions other than END, including other definitions or calls, can be in the body of a definition. 

Each request for assembly of one of the saved sequences of code, such as a reference to a macro, 
causes an entry in the assembler recursion stack. The most recent entry in the stack points to the 
source of statements (the definition) to be assembled. When the definition contains an inner, nested, 
reference to a saved definition, the stack pointer is changed so that the source of statements is the 
innermost definition. The stack allows nesting of definitions to a maximum level of 400. When the 
end of a definition is reached, the assembler switches to the preceding entry in the stack. When the 
stack is empty, the assembler resumes assembly of the next statement in the input source deck. 

A nested definition must be wholly contained by its next outer definition. 

Definitions are saved compressed but otherwise unedited (with micro and concatenation marks). Editing 
occurs each time the definition is processed. Compression removes blanks and replaces them with 
coded bytes as follows: 

A single space is represented by 55g; it is not compressed. Two or more embedded spaces are 
replaced in the image as follows: 

2 spaces replaced by 5555 g 

3 spaces replaced by 0002 

4 spaces replaced by 0003 


64 spaces replaced by 0077g 

65 spaces replaced by 007755g 

66 spaces replaced by 00775555 g 

67 spaces replaced by 00770002 etc. 

O 

Trailing spaces are considered as embedded and are included in the image. The 00 character 
(colon) is represented by the 12-bit code 0001. A 12-bit zero byte marks the end of the statement. 

The listing identifies the source of statements and the recursion level for all definition operations. 
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For XTEXT, DUP, and ECHO, assembly occurs as soon as a definition is saved. Unless the definition 
contains a USE, USELCM, or ORG instruction, code is assembled into the block in use when the 
XTEXT, DUP, or ECHO is encountered. For RMT, macros, and opdefs, however, definition and 
assembly take place in two steps. The block in use at definition time does not determine where code 
in the definition will be assembled. That is, code is assembled into the block in use when the definition 
is assembled if the definition does not itself contain a USE, USELCM, or ORG. 

Similarly, for XTEXT, DUP, and ECHO, any qualifier in effect when the pseudo instruction is 
encountered applies to symbols defined in the sequence (assuming the sequence does not contain a 
QUAL). For RMT, macros, and opdefs, however, because definition and assembly take place in two 
steps, the qualifier in use at definition time does not affect symbols in the definition. The qualifier, 
if any, in effect when the definition is assembled is applied to the symbols defined in the sequence. 

A qualifier applies to symbols only. It does not apply to block names or to the names of DUP, ECHO, 
RMT, or macro definitions, nor to any substitutable parameter names. 

In definitions having substitutable parameters, it is possible to use a different block name, different 
qualifier, or different symbols with each expansion simply by declaring either the qualifier symbol, 
block name, or symbols to be qualified as substitutable parameters. (For an example, refer to 
example 7 under Macro Call.) 


5.1 EXTERNAL TEXT (XTEXT) 

The XTEXT pseudo instruction provides a means of obtaining source statements from a file other than 
that being -used for input. COMPASS transfers the text from the external source and assembles it 
before taking the next statement from the interrupted source of statements. The file may be a sequential 
file, an indexed file with named records, or an UPDATE or MODIFY^ random-access program library 
file. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

file 

XTEXT 

rname 


file Name of a file containing source statements. If file is omitted, COMPASS 

assumes the file named in the X parameter on the COMPASS control statement 
(section 10.1.2). If no X parameter was specified, COMPASS assumes OLDPL. 

rname If rname is blank, COMPASS assumes that the file is sequential; it rewinds the 

file and reads the first section. If rname is not blank, it is the name of the 
section to be read. The file must be a SCOPE 3 indexed file with named 
records, a record indexed file with named records, a random-access program 
library file in UPDATE format, or a random-access program Ubrary file in 
MODIFY format. 


t 


MODIFY is not supported by NOS/BE 1 and SCOPE 2. 
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Text records may be in any of the following formats: 

1* Norm al text. If the first line contains rname starting in column 1, it is skipped. 

2. A common deck in an UPDATE or MODIFY^ random-access program library file. If the file 
is in UPDATE format, the first line (*COMDECK rname) is always skipped. If the file is in 
MODIFY format, the identification (7700) and modification (7702) tables are skipped. COMPASS 
does not recognize UPDATE or MODIFY directives such as *IF in the common deck. 

3. An UPDATE or MODIFY^ compressed compile file section. 

COMPASS reads source statements to an end-of-section mark or an END pseudo instruction. 


5.2 REMOTE ASSEMBLY 


Definition and assembly of remote code takes place in two steps. A pair of RMT pseudo instructions 
delimit code that is to be saved for later assembly. Later, a HERE pseudo instruction directs 
COMPASS to assemble a specific sequence of remote code or to assemble all unlabeled remote code. 
An END instruction causes any unlabeled remote code to be assembled. 


5.2.1 RMT - SAVE REMOTE CODE 

A RMT pseudo instruction signals the beginning or the end of a sequence of code to be assembled 
remotely. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIEtOS 

rmtname 

RMT 



rmtname Optional 1-8 character name identifying the remote sequence. It is 

significant on the beginning RMT only. The field is ignored for a terminating 
RMT. If supplied, rmtname can be used on a subsequent labeled HERE. 

If the sequence is unlabeled, an unlabeled HERE or END causes its assembly. 

A variable field entry, if present, is ignored. 


Any instruction legal when the remote lines are called for assembly is legal between the RMT pair. 
If expansion of an RMT reveals a second RMT pair implicit to the saved definition, assembly of the 
first pair must occur through a HERE instruction so that the inner pair will be expanded by an END. 
Similarly, if the assembly of the second pair reveals yet a third RMT pair, the second pair must be 
assembled through a HERE rather than the END, etc. 

Any labeled remote code present when END is processed is discarded without notice. 


t 


MODIFY is not supported by NOS/BE 1 and SCOPE 2. 
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5.2.2 HERE - ASSEMBLE REMOTE CODE 


A HERE pseudo instruction causes the labeled remote sequence to be assembled or unlabeled saved 
remote sequences to be assembled. In the absence of a USE, USELCM, IDENT, or an ORG within 
the saved sequence, the remote code is assembled under the block in use at the time the HERE is 
encountered. In the absence of a QUAL within the saved sequence, symbols are qualified under the 
qualifier in use at the time the HERE is encountered. RMT code is assembled only once. After it 
is assembled, it is no longer saved. A HERE encountered when there is no remote text saved has no 
effect on assembly. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

rmtname 

HERE 



rmtname Optional; the name of a previously saved RMT sequence. Only the named 

sequence will be assembled at this time. 

A variable field entry, if present, is ignored. 

If unlabeled remote sequences still remain to be assembled when the END statement signaling the end of 
assembly is encountered, COMPASS assembles them before it terminates assembly. However, any 
RMT pairs that might have resulted from the assembly are lost. Also, any remaining labeled remote 
code is lost. 

Examples: 

The following example illustrates use of RMT within a macro definition. Following the last call to 
the macro, a HERE causes all saved unlabeled RMT sequences to be assembled. 
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Location 


COMMENTS 


VARIABLE 


LOCATION 


OPERATION 


TABLE. TNAM.tQIV 

EQ.**EulV* 

^-ORIGINS 

BUCKET 

B 

tQIV 

O.EQIV 


MACRO 

IT C 

EQU 

CON 

ELSE 

EQU 

EQU 


TNAM 

O.TNAM 


TNAM 

O.TNAM 


TNAM+SIZES 


L.TNAM 


INTEk 


TABLE 


L. INTER 


LASTAB 


LASTAB 

O.LASTA 


*-0k 

BUCK 


RMT 

L.LASTAB EQU 

RMT 
ENDM 

NR TAB TABLE 

ELSE 
EQU 
EQU 


ABLE 

ABLE 


ABLE 

ABLE 

ABLE 


NR TAB 
O.NRTAB 


ASTAb 

.LASTAB 


RMT 

EQU 

RMT 

ENDM 


HERE 


iMfggPCTgga 
■T'.r-N-wEi! ’ . ; 

ill 

NRTAB+SI2ES 

'■ :■ ■ 1 

gj. ' 23yytc3HHj[ 
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In the following example, assembly of the RMT sequence is caused by the END statement. 




LOCATION 

OPERATION 

VARIABLE COMMENTS 

2 


11 

18 (JO 

1 

FLD 

PRS 

RMT 

DECMIC 

LIT 

LIST 

i 

BUF♦BUFL-WSA+ENUS 

c**fld* decimal required.* 

1 

1 

C 1 


m 

" ■■ 

' ■ • Y ■ P 

1 


5.3 CODE DUPLICATION 

This section describes two pseudo instructions (DUP and ECHO) that cause a sequence of code to be 
assembled repeatedly. For a DUP sequence, each assembly is identical with the first, and the 
number of repetitions is specified or is indefinite. For an ECHO sequence, each assembly resembles 
a macro reference. Actual parameters supplied in a list are substituted for formal parameters on 
each repetition of the code sequence. The number of repetitions is determined by the number of 
actual parameters provided on the ECHO instruction. 

Every inner DUP or ECHO sequence must lie totally within the range of the next outer DUP or ECHO, 
or a fatal E error is flagged. 


5.3.1 DUP-SIMPLE DUPLICATION 

The DUP pseudo instruction specifies repeated assembly of the statements immediately following. 
The range of the DUP is specified either by a source statement count on the DUP instruction or by an 
ENDD. 


Format: 


IOCATION 

OPERATION 

VARIABLE SUBFIELDS 

dupname 

DUP 

rep.fnct 


dupname Optional name of the DUP sequence; 1-8 characters. When supplied, it can be 

used in an ENDD. When no name is supplied, the range of the DUP is determined 
by a statement count or by any unnamed ENDD. 

re P Absolute evaluatable expression specifying the integer number of times state¬ 

ments in the DUP range are to be assembled. If rep is null or zero, the instruc¬ 
tions in the range are not assembled; that is, code is skipped. When base is M, 
COMPASS assumes that rep is decimal. 
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NOTE 


A very large (unobtainable) repeat count in conjunction with a 
STOPDUP instruction can be used for indefinite duplication 
of code. 

fnct An evaluatable expression specifying an integer count of the number of 

statements to be assembled repeatedly. When base mode is M, COMPASS 
assumes that fnct is decimal. The count is decremented for statements only;- 
comment lines (identified by * in column one) are not counted. On each 
iteration, the assembler copies the source statements and then assembles 
them. Thus, any recursive statements within the sequence are counted 
before they are expanded. 

The aupname and fnct parameters are related. 

1. If a count is supplied, it takes precedence over any ENDD. The only effect of an ENDD is to 
be included in the count. Under count control, a name is irrelevant. 

2. If neither a count nor a name is supplied, the DUP range is terminated only by an unnamed 
ENDD. 

3. If a name but no count is supplied, the DUP range is terminated by an ENDD with a matching 
name or by an unnamed ENDD. An ENDD with a name that does not match does not effect the 
range. 


5.3.2 ECHO - ECHOED DUPLICATION 

The ECHO instruction specifies repeated assembly of the instructions immediately following. On each 
iteration, the assembler copies the source statements substituting an actual parameter in the list for 
each formal parameter until the shortest list is exhausted, and then assembles the statements. ECHO 
offers many of the features of macros but does not require separate definition and reference. The 
range of the ECHO instruction is specified either by a source statement count specified on the ECHO 
instruction, or by an ENDD. The statement count, when used, is decremented for instructions only; 
comment lines, identified by * in column one, are not part of the definition and are not counted. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELOS 

dupname 

ECHO 

fnct,p 1 =(list 1 ),p 2 =(list 2 ),... ,p n =(list n ) 


dupname Optional name of the ECHO sequence; 1-8 characters. When supplied, 

it can be used in an ENDD. When no name is supplied, the range of the 
ECHO is determined by a statement count or by any unnamed ENDD. 
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fnet Optional absolute evaluatable expression specifying an integer count of the number 

of source statements to be assembled repeatedly. If base mode is M, the 
count is assumed to be decimal. If fnct is zero or omitted, the comma must 
be present and the ECHO range is defined by an ENDD. 


Any recursive statements, such as macro references, are counted before 
they are expanded. 


If the count exceeds the range of an outer DTJP or ECHO sequence, a fatal 
E error is flagged. 


The dupname and fnct parameters are related. 

1. If a count is supplied, it takes precedence over any ENDD. The only effect of an ENDD in a 
count-controlled sequence is for it to be included in the count. Under count control a name 
is irrelevant. 

2. If neither a count nor a name is supplied, the ECHO range is terminated only by an unnamed 
ENDD. 

3. If a name but no count is supplied, the ECHO range is terminated by an ENDD with a matching 
name or by an unnamed ENDD. An ENDD with a name that does not match does not terminate 
the sequence. 

Pj Names of not more than 63 formal substitutable parameters. Each name is 1-8 

characters, the first of which must be alphabetic. A name cannot be END, 
LOCAL, ENDD, IRP, or ENDM. A second or later occurrence of a parameter 
name is ignored. A name that begins with a number is ignored. The substi¬ 
tutable parameter name can occur in any field within a definition. 


The separator between pj and (listj) is conventionally an = but can be any of the 
following: 

+ -*/()$=» or . 

COMPASS recognizes a substitutable parameter name within a definition when it 
is between any two of the following: 

: + -*/()$ = blank , . ^ or ,-*■ 


Before the ECHO definition is stored, COMPASS replaces each use of a 
substitutable name. Otherwise, it saves the definition unedited, i.e., with 
micro and concatenation marks. Use of the semicolon is restricted in the 
definition because the assembler, when it expands the definition, interprets it 
as a substitutable parameter flag (77 Q ). 

O 
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The character r* flags the occurrence of a name not bounded by any other 
special character and, thus, not otherwise recognized. When it expands the 
definition, COMPASS substitutes an actual parameter value from the list for 
the substitutable parameter and removes the r+ so that the adjacent items are 
concatenated. 

Because the assembler replaces the first substitutable parameter with 7701, 
the second with 7702, etc. the programmer can use the display characters 
;A, ;B, etc. directly in place of his substitutable parameter names in the 
definition and achieve the same results as if the assembler had replaced the 
name with the flag. (Example 8, section 5.4.3 illustrates a similar application 
of this technique.) 

(listj) Actual parameter list in the form a^, ag,..., a Q where aj is substituted for p^ 

on the first assembly of the ECHO sequence, ag is substituted on the second 
assembly, etc. until the shortest list is exhausted. Two consecutive commas 
are interpreted as a null parameter. An explicit zero, if desired, must be 
entered. An actual parameter can contain a set of embedded parameters 
enclosed by parentheses. However, the embedded parentheses must be 
properly paired. The assembler removes the outer pair of parentheses before 
substituting the embedded set in a line. A parenthetical item can contain blanks 
or commas. 

If there are no parameters or any of the lists are null, COMPASS assembles (he 
ECHO sequence zero times, effectively skipping it. 


5.3.3 STOPDUP - STOP DUPLICATION 

The STOPDUP instruction allows premature termination of a DUP duplication before the repeat count 
is reached or of an ECHO duplication before the shortest list is exhausted. Assembly is completed to the 
end of the range for the current iteration and then continues with the next source statement. Only the 
innermost duplication is affected. 

A STOPDUP outside of a DUP or ECHO range has no effect cm assembly. If a DUP or ECHO is nested, 
STOPDUP terminates only the innermost DUP or ECHO. 

Format; 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


STOPDUP 



An entry in the location or variable field is ignored. 
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5.3.4 ENDD - END DUPLICATION SEQUENCE 


The ENDD pseudo instruction terminates a DUP or ECHO sequence when the statement count is 
unspecified on the DUP or ECHO. 

Format: 

LOCATION OPERATION VARIABLE SUBFIELDS 

dupname ENDD 


dupname Name of a DUP or ECHO sequence, or blank. A named DUP or ECHO 

sequence can be terminated by an ENDD specifying the sequence by name, 
or by any unnamed ENDD. An unnamed DUP or ECHO sequence that is not 
controlled by statement count is terminated only by an unnamed ENDD. 

An ENDD does not terminate a sequence controlled by a statement count. 

The ENDD is included in the count but has no other effect. 

An ENDD outside the range of a DUP or ECHO has no effect on assembly. 

ENDD is part of the definition it terminates; consequently, it is not edited at ECHO definition time. 
The following definition is in error: 

T r— 1 ECHO 
Code 

T i— 1ENDD 

In this code, the location field of the edited ECHO statement is Tl, but the location field of the un¬ 
edited ENDD statement remains at Tr*l. 

Examples: 

In the following examples, the statements that result from expansion are shown shaded- They are 
listed only when the E list option is selected. Source statements are shown in bold characters. 

1. This example illustrates use of a simple DUP instruction. 


Location Code Generated 


ooooos 


5153 OOOOOOOOOOCOOOOOOGOl 

5154 00000000000000000001 

5155 O00QG0000OQ0G000000 l 

5155 00000000000000000001 

5157 000000^0000000^0000) 



LOCATION OPERATION 

VARIABLE 

COMMENTS 


? 

11 

18 

30 


DUP 

c . i 




DATA 

l 




DATA 

l 


1 


DATA 

i 

*L)OP* 

1 


Data 

l 

*QUP* 

1 


DATA 

i 

«OUP* 

1 


DATA 

i 

*DUP* 

1 
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2. This example illustrates a nested DUP instruction with one of the DUP duplications terminated 
by a STOPDUP. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

30 


7? 

0 

macro 




i 

AG 

MICRO 

NO • 1 « / * A ( i-M A m F T t/ 




1FC 

■• :j,//T<,G?/F/, 1 ASSEMBLE STOPJuP WHEN TAG=E 




STOdour 



tt 

0 

SET 

NO* i 

NO IS 6 IN LAST ITERATION 


r- 

0 

EMpM 




A 

LPHARFT 

MIC»0 

1 , ,/APCi’fKGHI JK/ 


r. 

0 

set 

1 





0i IP 

GO 

ENOn 

- ! 

UNOBTAINABLE ITERATION COUNT 




mmarn 

WMMsmsmss^i 





viaf; 'V- 

I! 



0 

XIXIX18XXX 
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f§ 
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.lllilililllii 


,.;l s X ■ !■',< - X* 


'■■-'■■■ .:■■■. v 

s*r:jsas*s 

*5 ' i§ 



l 

If 

111 

:■■■■■ '■■■-.■■■■■., .■ 

simmmm 

SSsiiaSiSM* 

Stmt! 

xii 

mBB 

iilil 

H 

1 

■Iilllllillll 

x ■' • : - 

a 

Ixliliillf® 

llflslil 

usisii 

sxxstsysxsxixxiiSKa 

llpflptetji 
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3. This example illustrates nested ECHO instructions. A statement count terminates the second 
level ECHO The ENDD terminates the first level. Notice how COMPASS assembles each 
copy before it begins the next iteration. 
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5.4 MACROS AND OPDEFS 


A macro or opdef definition is a sequence of source statements that are saved and then assembled 
whenever needed through a macro or opdef call. A macro call consists of the occurrence of the 
macro name in the operation field of a statement. It usually includes parameters to be substituted 
for formal parameters in the macro code sequence so that code generated can vary with each assembly 
of the definition. 

An opdef call differs from a macro call in that the assembler interprets the call by examining the 
format or syntax of the instruction rather than the contents of the operation field alone. The instruction 
comprising the opdef call usually includes parameters to be substituted for parameters in the code 
sequence. There are some differences in the way parameters are substituted, however, as is further 
described under Opdef Call. 

Use of a macro or an opdef requires two steps, definition of the macro or opdef sequence, and calling 
of the definition. 

A definition consists of three parts: heading, body, and terminator. 

Heading A macro definition is headed by a MACRO or MACROE pseudo instruction 

stating the name of the macro and identifying substitutable parameters in 
the body of the macro. 

An opdef definition is headed by an OPDEF pseudo instruction stating the syntax 
of the calling instruction and identifying substitutable parameters in the body of 
the macro. 

The heading optionally includes one or more LOCAL instructions identifying 
symbols local to the definition. 

Body The body begins with the first statement in a definition that is not a LOCAL 

statement or a comment line. A comment line can be either identified by * 
in column one or can have columns 1-29 blank. (Following the first statement 
of the macro body, only comments identified by * in column 1 are ignored.) 

Use of the semicolon is restricted because when a definition is expanded a 
semicolon is interpreted as a substitutable parameter mark or a local symbol 
flag. 

The body consists of a series of symbolic instructions. All instructions other 
than END, including other macro and opdef definitions and calls are legal within 
a definition. However, a definition within a definition is not defined until the 
outer definition is called. Therefore, an inner definition cannot be called before 
the outer definition is called. 

A name of a substitutable parameter or local symbol listed in the heading can 
occur in any field within the body. A reference to a substitutable parameter or 
local symbol is recognized when it is between two of the following characters in 
an expression or field: 

: +-*/()$= blank , . ^ or r* 

The character)—* flags the occurrence of a name not bounded by any other special 
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character, and, thus, not otherwise recognized. On a call, the assembler 
substitutes an actual parameter value for the substitutable parameter and 
removes the |—*■ so that the adjacent items are concatenated. 

NOTE 

The programmer can legally use the characters . () : 

$ and = in symbols, but when he does, he must be careful 
that these characters are not interpreted as delimiters in 
macro definitions (example 4 under macro calls). A symbol 
should not begin with a colon; if it does, the colon is 
ignored and no error message is issued. 

The macro body optionally contains IRP pseudo instructions that allow iterative 
assembly of a sequence within the body such that each iteration uses a different 
parameter value. 

Terminator An ENDM pseudo instruction terminates a macro or opdef definition. 

Definition 

Processing A macro or opdef can be defined anywhere in a subprogram before it is called. 

When COMPASS encounters a definition, it places the name of the macro or the 
syntax of the opdef along with the number of substitutable parameters and local 
symbols in the assembler operation code table. Before the definition is saved, 
COMPASS replaces each occurrence of a parameter name or local symbol with 
a 77xx (where xx is a number assigned to the substitutable parameter or local 
symbol). 

On the call, each use of a substitutable parameter (each 77xx) is replaced by 
its actual parameter; each use of a local symbol is replaced by a unique symbol 
generated by the assembler. Usually, symbols replaced in this way have no 
meaning outside the definition. However, if the macro includes an RMT 
sequence which contains local symbols, the local symbols will have meaning 
where the remote code is assembled outside of the definition. 

5.4.1 ENDM - END MACRO DEFINITION 

An ENDM terminates a macro or opdef definition. 

Format; 

LOCATION OPERATION VARIABLE SUBFIELDS 

mname ENDM 


mname Name of a macro sequence, syntax of an OPDEF sequence, or blank. 
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An ENDM specifying a macro by name terminates the named macro definition and any unterminated 
macro or opdef definitions within it. An ENDM that does not specify a macro by name terminates all 
unterminated definitions. An ENDM outside the range of any macro sequence has no effect other than 
to be included in statement counts. 

ENDM is part of the definition it terminates; consequently, it is not edited at MACRO definition time. 
The following definition is in error: 

Tr-*1 MACRO 

Code 

Tr*l ENDM 

In this code, the location field of the edited MACRO statement is Tl, but the location field of the 
unedited ENDM statement remains at Tr*T. 

Example: 



5.4.2 MACRO - MACRO HEADING 

A MACRO pseudo instruction notifies the assembler to place the instructions forming the body of the 
macro in a table of macro definitions for assembly upon call and place the macro name in the operation 
code table. 

The MACRO pseudo instruction has two forms: 

Format one: 



LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

mname 

MACRO 

parameters 
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Format two: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


MACRO 

mname, parameters 


The blank location field identifies the second format. 

mname A legal name other than END, ENDD, IRP, LOCAL, or ENDM. 1-8 characters. 

A name that is identical to a PPTJ symbolic machine instruction, pseudo 
instruction, or macro already in the operation code table redefines the 
instruction. The most recent-definition applies for the macro call. A 
redefinition causes an informative flag to be issued but the new definition 
holds. 

parameters Names of substitutable parameters. The order in which names are listed 

determines the order in which parameters must occur in the macro call. 

Each name is 1-8 characters, the first of which must be alphabetic. A name 
cannot be END, IRP, LOCAL, ENDD, ENDM, or the same as a local symbol. 

A name that begins with a number, or a second or later occurrence of a para¬ 
meter name in the list is ignored. 

Any of the following special characters separate parameters in the list: 

+ -*/()$=, or . 

These characters have no meaning other than as separators. A blank 
terminates the list of parameters. Also, any of these characters can be used 
to separate the mname from parameters in format two. 

The total number of unique parameter names and local symbols must not 
exceed 63 for any one macro definition. 

Format one does not require parameters. 

Format two requires at least one substitutable parameter. This parameter is 
termed the location argument because the location field entry in the macro call 
is its substituted value. Omission of the location argument from a MACRO 
instruction in format two causes the assembler to issue a fatal error and 
ignore the definition. 

The assembler ignores a blank parameter produced by two adjacent 
separators or by a separator at the end of the list. 

For an example of definition and calls, refer to Macro Calls. 
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Examples of macro instructions: 

1. Legal MACRO instructions: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


ABC 

MESSAGE 

MACRO 

MACRO 

MACRO 

-1- 

P1*P2,P3 1 

0EF*L0C*0NE*TW0*TEN 

A 1 


2. MACRO instructions having identical parameter lists. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


11 

18 

1 30 








SUM 

SUM 

SUM 

SUM' 

RAO 

RAO 

MACRO 

MACRO 

MACRO 

MACRO 

MACRO 

MACRO 

X= Y+Z + X 

X (Y + Z) 
X=Y+Z 

X, Y, (Z«-X) 

X 

X = X + 1 

jSECOND X PARAMETER IS IGNORED 

1 

'null PARAMETER AND SECOND 
jx ARE IGNORED 

1 SECOND X AND NUMERIC 
'PARAMETER ARE IGNORED 

3. 

Rlegal use of format two: 






LOCATION 

OPERATION 

VARIABLE COMMENTS 



11 

18 130 



MACRO 

MACRO 

MACRO 

ABC ! NO SUBSTITUTABLE PARAMETER 

ABC* *FP , NULL PARAMETER FIELD 

A8C.16.FP i NUMERIC PARAMETER FIELD 
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5.4.3 MACRO CALLS 


A macro headed by a MACRO pseudo instruction can be called by an instruction in the following format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

mname 

Pl*P2>•• • *P n 


sym Optional; depends on definition (see discussion following) 

Pj Parameter list composed of alphanumeric strings. Parameters are separated 

by commas and terminated by a blank. Two consecutive commas constitute 
a null parameter. An explicit zero, if desired, must be entered. 

Each parameter must be in its correct relative position depending on the sequence 
in which its formal substitutable name is given in the MACRO pseudo instruction. 

When the definition MACRO is in format one, the first parameter in the call is substituted wherever the 
first substitutable parameter occurs in the definition, the second parameter in the call is substituted 
wherever the second substitutable parameter occurs in the definition, etc. When the definition MACRO 
is in format two, the location field entry in the call is substituted wherever the first substitutable 
parameter occurs in the definition, the first parameter in the variable field of the call is substituted 
wherever the second substitutable parameter occurs in the definition, etc. 

If null parameters are interspersed with legal parameters, the correct positions must be established 
with commas. When the list terminates before the last possible parameter, all remaining parameters 
are considered null. 

When the first character of a parameter is a left parenthesis, the assembler considers all the 
characters between it and the matching right parenthesis as an embedded parameter or as an iterative 
parameter. It is an iterative parameter when the substitutable parameter has been named in an IRP 
pseudo instruction (section 5.4. 9). Otherwise, it is an embedded parameter. 

The assembler removes the outer pair of parentheses before substituting the enclosed character string 
in a line. Embedded parenthetical items must be properly paired. A parenthetical item can contain 
blanks and commas. 


Example: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


n 

IS 1 30 



MESSAGE 

(=C*PR0GR AM i ABORT•*) 

i 


After substitution, spacing between fields is the same as it was before substitution. One effect is that 
a null actual parameter replacing a formal parameter in a variable field effectively moves the comments 
field to the left. Then, when the line is assembled, the comments could be erroneously interpreted as 
a variable subfield. 
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Processing of a location symbol and forcing upper of the first macro instruction depend on the MACRO 
form used for the definition. 

If the macro is defined using format one, that is, the macro name is in the location field, a location 
symbol on the macro call line forces the first word of generated code upper. The location field symbol 
is assigned the current value of the location counter. A location field (if any) on the line in the 
definition that generates the code is assigned the same address. If the location field of the macro call 
does not contain a symbol, the location and position counters are not affected by the call. 

When the macro is defined using format two, that is, the macro name is in the variable field and the 
first parameter is a location argument, (lie location symbol of the call is substituted for the first 
parameter or location argument. The fact that this argument came from the location field rather than 
the variable field has no special significance in the macro expansion. In the macro call, the location 
field argument cannot be more than 8 characters. Parentheses are not given the special meaning used 
in the variable field of a macro call line. 

Example: 

1. An illustration of concatenation 


Location Code 

Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


it 

18 

30 

<♦740 


MACK 

MACRO 

S-*P1 

• 

• 

• 

tNDM 

• 

• 

• 

MACK 

Pi.P£ 

Pi ♦ 1 Rr*P2 

A2,A 


|/4o )s6a?oooooi 


n 

iMllilii 

S<*Air 

SA2 

hd* l^rfA 

MACK . 1 




tNOM | 

MACK .1 
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An illustration of nested definitions and calls 


LOCATION OPERATION VARIABLE 


INAMEl MACRO 


NAME2 MACRO 


NAME2 


NAME1 


NAME2 


NAME! 


NAME2 


AT THIS 1IME» THIS LINE 
IS PART OF A DEFINITION 
RATHER THAN BEING A CALL. 


NAME1 IS CALLED AND EXPANDED. 


CALL TO NAHE2 IS VALID 


3. The following example illustrates two calls to a definition headed by a MACRO in format two 
using the location argument. The macro is named TABLE; its substitutable arguments are 
TABNAM, VALUE1, and VALUE2, where TABNAM is the location argument. 


Location Code Generated 


OPERATION VARIABLE 




MACRO 

VFD 

ENDM 


T ABLE.T AflNAM.VALUE1.VALUE2 
oO/VALUEl *6J)/VALUE2 


p®g|gj gg 9n9HSBB| 




mwmmmm 

ms 

smmmmmi 

mssmms 


mm 


jjj 


IS ®P?18f58»iS!S ii#*iSISS|S 9Stg&i$SfMlikiMfi 
m SSilffiSSSi; Sr:fW! ¥ |JS SiSIS§|ISSi*lSlil 
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4, 


An illustration of embedded parameters: 


Definition: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

Uo 






XAM 

MACRO 

10M 

LJM 

ENOM 

».P i 

S | 

i 


Call: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

le 1 30 



X AM 

<SIIM,10B> , (SAM, IND3) 


Expansion: 


Location 

Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


11 

18 

1 30 

no 3 

7305'^;/ 

bOlO 7?.^ 
0117 72*3 


Eiffel 

L DM 

LJM 
f Nf)M 

SUM,1 OH - 1 

SAM,INO3 ; 1 

«r JL I 


5. The following example illustrates use of R= in macros: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

f 30 




. _.. — —. ..- 


ONSM 

MACRO 

N 




R= 

XI,N 

| 



SX2 

11B 

1 



RJ 

=XCPM= 

1 



ENOM 


1 


OFFSM 

MACRO 

N 

1 



R* 

XI,N 

1 



SX2 

12B 

1 



RJ 

=XCPM= 

1 



ENOM 


1 
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6. The following example illustrates a character in a symbol erroneously being interpreted as a 
delimiter for a parameter. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

1 30 


ABC 

MACRO 

Z» VAL ,P5 

! 


Z 

SET 

VAL 

i 



SA7 

• 

Z. ALPHA 

• 

Iillegal symbol, too long 

1 



• 

ENDM 

• 

i 

1 



ABC 

IOTA,1.3 

1 


IOTA 

SET 

1 

| 



SA7 

I OTA.ALPHA 

ILLEGAL SYMBOL, TOO LONG 



ENDM 


! 


ABC 

ABC 

ABC 


.1 
♦ 1 
.1 


7. The following example illustrates changing of control blocks and symbol qualifiers through 
substitutable parameters in a macro. (The same call could be used by using micros to 
change actual parameters.) 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 |30 


TAB 

MACRO 

BLOCK,KWAL ! 





USE 

BLOCK i 





OUAL 

KWAL 1 




TAG1 

BSS 

10B | 




TAG? 

VFD 

60/-1 i 





USE 

* 





OUAL 

* 1 





ENDM 

• 

1 

1 





• 

TAB 

1 

ONE,ONE ! 





USEf-ipl 


TAB 

.1 




OUAL 

ONE 

- TAB 




TAGI 

BSS 

10B 

TAB 




TAG? 

VFD 

66/-1 I 

TAB 





USE 

* | 

TAB 





OUAL 


TAB 





ENDM 


tab 





TAB 

TWO,TWO 1 





USE 

TWO ■ 

TAB 

.1 




OUAL 

TWO i 

TAB 

. 1 



TAGI 

BSS 

10B 1 

TAB 

.1 



TAG? 

VFO 

60/- 1 1 

TAB 

•1 




USE 

# 1 

TAB 

• 1 




OUAL 

« 1 

TAB 

• 1 




ENDM 

r 

TAB 

,1 
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8. The following example illustrates a technique that an experienced programmer may wish to 
use to save time in processing of definitions. Remember that the assembler replaces the 
first substitutable parameter with 7701, the second with 7702, etc. Note that 7701 is ;A in 
display characters, 7702 is ;B, etc. This means that the programmer can use the display 
characters directly in place of his substitutable parameter names in the body of the definition 
and achieve the same results as if the assembler had made the substitution when it saved the 
definition. At the time the definition is assembled, the assembler replaces each 77xx with the 
actual parameter whether the code was inserted by the assembler when it saved the definition 
or by the programmer when he coded the definition. 



■ 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 




1 


II 

18 

1 30 





CHAW 

MACRO 

ASC [ I . INTEPf 

AL«EXTEPNAL4t 

id) 





CON 

E N 0 

0 

; 0 s C : B J * 




0-*0 



• 

• 

4 r. <; r 

C 







C h A ^ 

> ■’ • 1 0 » 1 0 • 3 0 

ft 


7771 

000000000000301010*3 



COM 

30101043 

CHAP 

i®J i 





FNHM 

Am 

Chap 


277? 





4*4 • l 1 4 1 1 • 3 1 • 

9 


777? 

OOOOOOCOOOOO31111144 


I?#9® 


31111144 

Chap 


222JL- 




O'CAP 

. 4 b ».6 0 *Z0.J 1.3 . 

4 


7773 

00000000000013?0*>0<‘S 


r - pfef 1 -> 

CON 

1 3P0C04-J 

Chap 





ENIjM 


Chap 

i 

7774 




C MAO 

4 6 4 4 0 1 40 • 16 

- 


7774 

OOOOOOOOOOCOIS'40404*. 


■ ■'-y :V‘. 

COJ i 

i 

CHAP 

i 


■ 



FNDM 


Char 

i 

7776 




C H A iv 

47,-j4»S4»lP 



7776 

00000000000017343447 



COM 

1 ?S'*34-4 7 

CHAR 

i 




"pip 

ENOM 


CHAP 

i 

717 




CHAP 

' ■; 4 5 1.4 1 . 1 r 

/ 


777*> 

000000000000 1 7MP1SG 



C-OH 

1 7 h 1 p 1 B / 

chap 

i 




E Nb 


4.i Chap 

i 
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5.4.4 MACROE - EQUIVALENCED MACRO HEADER 

A MACROE pseudo instruction can be used instead of a MACRO instruction to notify the assembler to 
place the instructions forming the body of the macro in a table of macro definitions for assembly upon 
call, to place the macro name in the operation code table, and to save the list of parameter names so 
that actual parameters supplied in the macro call can be listed by name in any sequence in the macro 
call. 

The MACROE pseudo instruction has two forms: 

Format one: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

mname 

MACROE 

parameters 


Format two: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


MACROE 

mname, parameters 


The blank location field identifies the second format. 

mname A legal name other than END, ENDD, IRP, LOCAL, or ENDM. It can be 

1-8 characters. A name that is identical to a PPU symbolic machine instruction 
name, pseudo instruction, or macro instruction already in the operation code 
table redefines the instruction. The most recent definition is the one that applies 
for the macro call. A redefinition causes an informative flag to be issued but the 
new definition holds. 

parameters Names of substitutable parameters. Unlike MACRO, the order in which names 

are listed does not determine the order in which parameters can occur in the 
macro call. Each name is 1-8 characters, the first of which must be alphabetic. 
A name cannot be END, ENDD, LOCAL, IRP, ENDM, or the same as a local 
symbol. A name that begins with a number, or a second or later occurrence of 
a parameter name in the list is ignored. Any of the following special characters 
separate parameters in the list: 

+ -*/()$ = , or . 

These characters have no meaning other than as separators. A blank terminates 
the list of parameters. Also, any of these can be used to separate the mname 
from parameters in format two. 

The total number of unique parameter names and local symbols must not exceed 
63 for any one macro definition. 

Format one does not require parameters. 
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Format two requires at least one substitutable parameter. This parameter is 
termed the location argument because the location field entry in the macro call 
is its substituted value. Omission of the location argument from a MACRO 
instruction in format two causes the assembler to issue a fatal error flag and 
ignore the definition. 

The assembler ignores a blank parameter produced by two adjacent separators 
or by a separator at the end of the list. 

For an example of definition and calls, refer to Equivalenced Macro Call. 


5.4.5 EQUIVALENCED MACRO CALL 

A macro definition headed by a MACROE pseudo instruction can be called by an instruction of the 
following format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

mname 

p l =a l* p 2 =a 2 . p n~ a n 


mname Name of MACROE definition 

sym Optional symbol. A symbol in the location field causes the location counter 

to be forced upper. The symbol is then assigned the value of the location 
counter. A location field symbol on the first line in the definition that generates 
code is assigned the same address. If the location field of the macro call does 
not contain a symbol, the manner of the force upper is a function of the first- 
code-gene rating line in the macro expansion. 

p.=a. An equivalenced parameter. Each p is the name of a substitutable parameter. 

The aj is an actual parameter to be substituted for Pj. The parameters need not 
be listed in the same order as they are listed on the MACROE instruction. 
Equivalenced parameters in the list are separated by commas and terminated 
by a blank. 

A null value is substituted for any parameter omitted from the list. 

When the first character of an actual parameter is a left parenthesis, the 
assembler considers all the characters between it and the matching parenthesis 
as an embedded parameter or as an iterative parameter. It is an iterative 
parameter when the substitutable parameter has been named in an IRP pseudo 
instruction (section 5.4.9, IRP). Otherwise, it is an embedded parameter. The 
assembler removes the outer pair of parentheses before substituting the enclosed 
character string in a line. Embedded parenthetical items must be properly 
paired. A parenthetical item can contain blanks and commas. 
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After substitution, spacing between fields is the same as it was before substitution. One effect is that 
a null actual parameter replacing a formal parameter in a variable field effectively moves the comments 
field to the left. Then, when the line is assembled, the comments could be erroneously interpreted as 
a variable subfield. 

Processing of a location symbol and forcing upper of the first macro instruction depend on the MACROE 
form used for the definition. 

If the macro is defined using format one, that is, the macro name is in the location field, a location 
symbol on the macro call line forces the first word of generated code upper. The location field symbol 
is assigned the current value of the location counter. A location field (if any) on the line in the 
definition that generates the code is assigned the same address. If the location field of the macro call 
does not contain a symbol, the location and position counters are not affected by the call. 

When the macro is defined using format two, that is, the macro name is in the variable field and the first 
parameter is a location argument, the location symbol of the call is substituted for the first parameter or 
location argument. The fact that this argument came from the location field rather than the variable field 
has no special significance in the macro expansion. After substitution, spacing between fields is the same 
as it was before substitution. 


| Example, format one: 


Location Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

30 



sam 

MACROE 

A »B»C 





CON 

A 





CON 

3 





CON 

• 

C 


500? 



• 

• 

SAM 

a=i «c=s»e 

= 0 


■■ Si 








$ki : 






111 

■ 

H I 


— 


? ::t s W? 




Example, format two: 


Location 

Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


1? 

18 

30 

2 

00000000000000000001 



MACROE 

CON 

CON 

CON 

EN0M 

SAM 

SAM,XX,A»B, 

A 

B 

C 

A*1»B*2>C*3 

: 
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5.4.6 OPDEF - DEFINE CPU OPERATION 


An OPDEF pseudo instruction notifies the assembler to place instructions in the body of the definition 
in a table of definitions for assembly upon call and place the instruction syntax in the operation code 
table. There is no way of removing the definition from the table. It can, however, be bypassed 
through redefinition, or disabled through PURGDEF. If the syntax duplicates a CPU instruction already 
in the table, the OPDEF definition takes precedence. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

syntax 

OPDEF 

parameters 


syntax The syntax consists of a mnemonic operator and variable field descriptors. 

The mnemonic operator consists of two characters. The first can be any 
character except blank. The second character can be a register designator: 
A, B, or X in which case the operation field of the opdef call is recog¬ 
nized as cAn, cXn, or cBn (c is a unique character; n is 0-7); or the second 
character can be any other character, in which case the operation field of 
the opdef call is recognized simply by a two-character mnemonic, such as 
EQ. 


The variable field descriptors define the order of appearance of all registers, 
expressions, and subfield separators that comprise the variable field of the 
opdef call. It consists of none, one, two, or three of the following 22 subfield 
descriptors. Q represents an expression. An r represents a register letter 
(A, B, or X). A comma separates two descriptors; a blank terminates the 


syntax. 


void 

Q 

r 

rQ 

-r 

-rQ 

r l +r 2 

r i +r 2 Q 

- r l +r 2 

- r l+r 2 Q 

r *r 

1 2 

r l* r 2 Q 

—r *r 

1 2 

- r l* r 2 Q 

r l / r 2 

r-j^ /r 2 Q 

" r l /r 2 

- r l /r 2 Q 

r l" r 2 

r r r 2 Q 

-r -r 

1 2 

“ r i" r 2 Q 
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For example, -ri * r 2 wou l^ be written as -X*B to describe -X3*B1 whereas rQ 
would be written as BQ to describe B2+ALPHA. The first descriptor immedi¬ 
ately follows the mnemonic operator. 

A substitutable parameter for each register designator (r) and expression 
parameters designator (Q) in the syntax in the order in which they occur in the syntax 

(and, consequently, in the calling instruction). Each name is 1-8 characters, 
the first of which must be alphabetic. A name cannot be END, ENDD, ENDM, 
IRP, LOCAL, or the same as a local symbol. A name that begins with a num¬ 
ber, or a second or later occurrence of a parameter name in the list is ignored. 
Parameters can be separated by any of the characters: 

+ -*/<)$ = , or . 

These characters have no meaning other than as separators. A blank terminates 
the list of parameters. 

The total number of unique parameter names and local symbols must not exceed 
63 for any one OPDEF definition. 

The assembler ignores a blank parameter produced by two concurrent separators 
or by a separator at the end of the list. A second or later occurrence of a 
parameter name in the list is ignored. 


Examples: 

1. Listed below are some instructions that could be defined through OPDEF: 


Calling Instruction 

— 

Opdef 

Syntax 

Operation 

Variable Subfields 

JPt 

Ktf 

JPQ 

JPt 

Bn+K 

JPBQ 

JP 

Bn+Bn+K 

JPB+BQ 

JP 

Bn, K 

JPB, Q 

JP 

Xn/Xn+K 

JPX/XQ 

NEt 

Bn, Bn, K 

NEB, B,Q 

LJ 

Bn-Bn, An-Xn, K 

LJB-B, A-X, Q 

BXnt 

-Xn*Xn 

BX-X*X 

SBnt 

Xn+Bn 

SBX+B 

LXnt 

Bn, Xh 

LXB, X 

JPt 

Bj+K 

JPBQ 

NEt 

Bj.Bk.K 

NEB,B, Q 

BXit 

-Xk*Xj 

BX-X*X 

SBit 

Xj+Bk 

SBX+B 

SBit 

Bj+Xk 

SBB+X 


f Legal COMPASS CPU instructions 
It K represents an expression. 
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2. The following complete definition redefines single-address long jump JP as the EQ jump, which 
is faster than JP on the 6600 Computer System. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


n 

18 

ho 






JPQ 

0P0EF 

Pi 

1 



EQ 

ENQM 

pi 

1 

i 


Each subsequent JP instruction that matches the syntax JPQ is assembled as an EQ. A JP 
instruction having a different syntax, such as the following, is not affected. 


Location 


10002 


Code Generated 

0233000005 + 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


n 

18 ho 



jp 

t13 + ALPH« ! 


3. The following definition traps all floating point double-precision subtraction instructions 

(DXi Xj-Xk) and jumps to an error-check routine for debugging. I, J, and K are substitutable 
parameters used within the definition. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

ho 


oxy-y 

OPDEF 

I, J.K 

-,--- 

i 



• 

• 

RJ 

ENDM 

fxnuT 

1 

1 

l 

1 


4. The following sequence causes RXi K to be defined as AXi K. It does not affect the standard 
RXi instructions involving registers. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

ho 




r ~ 


RXQ 

OPDEF 
AX.PI 
ENDM 

P1,P2 

P2 1 

I 

l 


5.4.7 OPDEF CALL 

An opdef call resembles a CPU mnemonic machine instruction. The mnemonic code, quantity and 
sequence of registers, arithmetic operators, and expressions (excluding operators within the expressions) 
must match the syntax described in the OPDEF for the definition to be called. 
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NOTE 


If the Q in a descriptor is combined with register letters, 
a plus or minus must precede an expression in the call. 


OPDEF Syntax Call 


JPQ 

JP 

K 

Not combined 

JPBQ 

JP 

Bn+K 

Combined 

JPB, Q 

JP 

Bn, K 

Not combined 

JPX/XQ 

JP 

Xn/Xn+K 

Combined 


An OPDEF call can occur any place after the definition is saved. In substituting parameters, the 
assembler uses only the register values given in the call. It does not substitute the register designators. 

A location symbol on the opdef call line forces the first word of generated code upper. The location field 
symbol is assigned the current value of the current location counter after the force upper. A location 
field on the line in the definition that generates code is assigned the same value. If the location field of 
the opdef call does not contain a symbol, the manner of the force upper is a function of the first code¬ 
generating instruction in the expansion. If the call location field and the code-generating instruction 
field both contain symbols they are assigned the same value. 

Only a line having the correct syntax calls the definition. 

Examples: 

The following opdef defines an instruction having the syntax IXX/X. On the call, the assembler 
substitutes 3, 4, and DIV (not X3, X4, and X. DIV) for PI, P2, and P3, respectively. 


Location Code Generated 

” 

LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

30 



IXX/X 

OPDEF 

PI»P2»P3 





PX.P2 

X.P2 





PX.P3 

X.P3 





NX.P2 

X.P2*B4 





NX.P3 

X.P3*B4 





FX.Pi 

X.P2/X.P3 





UX.P1 

X.P1*B4 





LX.PI 

X.P1*64 





endm 

• 






• 

1X3 

X4/X.DIV 




27404 



PX.4 X 

• 4 

1X3 .1 



27000 



PX.DIV 

X.DIV 

1X3 .1 



2 7 



NX.4 X 

.4 * b4 

1X3 .1 



24040 



NX.DIV 

X.DIV* 84 

1X3 .1 



44 34 0 



F X . 3 

X.4/X.DIV 

1X3 .1 



26343 



DX.3 X 

• 3 * t)4 

1X3 .1 



30 22343 



LX.3 * 

• 3 * B4 

1X3 .1 






ENDM 


1X3 .1 
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The following OPDEF selectively traps the SXi Xj+Bk instructions. 


Definition: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

] 


11 

18 

ho 


SXX+B 

OPDEF 

I* J t K 

-1—..— 

i 



• 

ENOM 


l 

I 


Statements that call the definition: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

130 



SX3 

• 

Xl + 82 

-!--—- 

i 

i 


SYH 

• 

• 

SX.NN 

X6+B.XXX 

1 

i 


Statements that do not call the definition: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

130 




SX5 

X4 

IN0 B DESIGNATOR OR +. 

1 




SX6 

B3+X4 

[registers interchanged 




SX.Y 

93 

1 

j NO X DESIGNATOR OR OPERANO 




SY 

X4 + B4 

[mnemonic code not sx. 



5.4.8 LOCAL—LOCAL SYMBOLS 

One or more LOCAL instructions that list symbols local to the definition optionally follows the MACRO, 
MACROE, or OPDEF pseudo instruction. The only lines that can separate the first header statement 
from LOCAL are comment lines. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


LOCAL 

symbols 


symbols List of local symbols. Each symbol must begin with an alphabetic character. 

Symbols must be separated by and must not include the following characters: 

+ -*/()$=, or . 
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A blank terminates the list. The assembler ignores a null symbol produced by 
two adjacent separators or by a separator at the end of the list. COMPASS ignores 
the use of a substitutable parameter name, another local symbol name, or a name 
beginning with a number in the local symbol list. A local symbol cannot be END, 
ENDD, ENDM, IBP, or LOCAL. The total number of unique parameter names and 
local symbols must not exceed 63 for any one macro or OPDEF definition. 

A location field symbol, if present, is ignored. 

A symbol in the list is considered local to the macro; that is, it is known only within the macro definition. 
On each expansion of the macro, COMPASS creates a new symbol for each local symbol and substitutes it 
for each occurrence of the local symbol in the definition (other than in comment lines identified by * in 
column 1). Thus, invented symbols replace LOCAL-named symbols wherever they appear in a macro 
definition in a manner similar to the way substitutable parameters are replaced. The chief difference 
between substitutable parameters and local symbols is that COMPASS automatically supplies the value C 
(character string to be substituted for) a local symbol so that it is unique for each macro call. 

A user passes a local symbol to inner macro definitions or inner macro calls when he does not declare 
the symbol local in any of the inner definitions saved or called. That is, a symbol declared local in a 
macro can be referred to in any inner macro that does not also declare it as local (see example 2). 

A symbol not defined as local is accessible from outside the macro definition. An invented symbol is 
qualified if defined while in a QUAL block. It is not listed in the symbolic reference table. Blanks 
are preserved in a line containing a substituted symbol; COMPASS makes no attempt to change the 
structure of the line. 

On the listing, each invented symbol is shown as Hsym, where sym is unique for each local symbol in 
the subprogram. For example, if the symbol A is declared local to the macro, the subprogram can 
define a different symbol A elsewhere. 

Examples: 

1. In the following example, C is local to macro ABC and is passed to inner macro definitions. 

In the definition, each occurrence of formal parameter A is replaced by the parameter mark 
7701; each occurrence of B by the parameter mark 7702, and each occurrence of C by the 
parameter mark 7703. Then, when ABC is called, COMPASS assigns invented symbol 
ttOOOOOl to C and replaces each occurrence of 7703 in definitions ABC and XYZ. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

j 30 


- 

ABC 

MACRO 

Af B 

i 




LOCAL 

c 




C 

BSS 

10 B 

.i 



• 

• 


i 

DEFINITION 


• 

• 



OF ABC 


XYZ 

MACRO 

0 

I 

1 




SA1 

c 

J DEFINITION 




• 


1 OF XYZ 




ENOM 


t 




ABC 

3*4 

1 

i 



■+ + 000001 


BSS 1QB 

I 

EXPANSION 


XYZ 

MACRO 

0 S 

1 

y OF ABC 



SA1 

*+000001 

DEFINITION 




tNDM 

J 

j OF XYZ 

1 
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2 . 


In the following example, C is local to each level. Note how this example differs from the 
preceding one. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

130 


BCD 

MACRO 

A,B 

; "1 




LOCAL 

C 

1 



C 

BSS 

10B 

1 



• 

• 


i 



• 

• 


i 

1 

DEFINITION 


• 

• 



l OF BCD 


YZA 

MACRO 


1 




LOCAL 

C 

J 




SA1 

c 

v DEFINITION 




• 


,OF YZA 



C 

8SSZ 

1 

1 

1 




FN0M 


1 / 



On the call to BCD, the assembler replaces each occurrence of C with the invented symbol, 
t<000002 including the use of the symbol in the LOCAL instruction for macro XYZ. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


1! 

18 

30 



BCD 

b ♦ b 

EXPANSION OF tiCl) 


♦ 4-000002 


bSS 108 

BCD .1 


YZA 

MACRO 


BCD .1 



LOCAL 

♦ 4.000002 

BCD .1 



SA1 

♦ 4-000002 

DEFINITION BCD .1 


t4000002 


bSSZ i 

BCD . 1 



enom 


BCD . 1 


Finally, on a call to YZA, M000002 is defined as local and the assembler replaces each 
t<000002 with another invented symbol. Thus, each reference to C in the source code SA1 
instruction does not result in a reference to the BSS in the outer macro. 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 

30 


♦ 4.000003 

YZA 

SA1 

ENOM 

♦♦000003 
ttSSZ 1 

Expansion of yza yza .1 

DEFINITION YZA «1 

YZA *1 


5.4.9 IRP - INDEFINITELY REPEATED PARAMETER 


An IRP pseudo instruction in a macro definition signals the beginning or end of a sequence of code to be 
assembled repeatedly with one parameter varied with each repetition. 


It has two formats: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


IRP 

parameter 


IRP 
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The first form introduces the sequence and names the substitutable parameter; the second form 
terminates the repeated sequence. In either form, a location field symbol, if present, is ignored. 

The parameter name must be listed as a substitutable parameter on the MACRO or MACROE pseudo 
instruction for the definition. 

On the macro call, the indefinitely repeated parameter consists of one or more subparameters enclosed 
by parentheses and separated by commas. The assembler assembles the sequence for each subparameter; 
the number of copies of the sequence depends on the number of subparameters (none at all when the 
actual parameter is null). When the list cf subparameters is exhausted, the assembler continues with 
the next line in the definition. If the named substitutable parameter does not occur between the two 
IRP instructions, the assembler repeats the code unchanged for each subparameter provided in the call. 

An IRP outside of the range of a macro has no effect bn assembly other than to be included in statement 
counts. 

IF-skips of IRP sequences should be controlled by instruction bracket names rather than statement 
counts because IRP expansions are done even when an IF-skip is used and because the number of 
statements generated by IRP is variable. 

Anything that can be done with an IRP pair can be done with ECHO and ENDD. IRP is faster at assembly 
time but ECHO is more flexible (it is not expanded during IF-skips, allows multiple arguments, and 
can be nested). IRP should be used when greater speed is desired and the expanded capabilities of 
ECHO are not needed. 


Examples: 


1. Repeat sequence within macro 


2AB 


22 

22 

.•:.•.:♦ ..-.*.; 


7261000000 

fPjjll 

5160000000 

(mi 

mmii 

5110000000 


7261000000 


5160000000 


5110000000 


7261000000 

X 1 

5160000000 
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LOCATION 


OPERATION VARIABLE 


MACRO 

IRP 

SA1 

SX6 

SA6 

IRP 

ENDM 


ZAB 

IRP 

SA1 

SXfc 

SA6 

SA1 

iSX6 

SA6 

SA1 

SX6 

SA6 

IRP 

FwnM 


COMMENTS 


I 30 


ARG»B 
AR6 
ARG 
X1 *B 
ARG 


I 

I 

I 

Irepeated 

ISECHJENCE 


DEFINITION 
OF ZAB 


(J*K*L) tCON 

J*K«L 

ZAB 

• 1 


.1 

gig 

" ■ \ ~ ■■■■', .... / ...,' ' 

.1 

SC8JS 


.1 


ZAB 

.1 

USIBp 

ZAB 

• 1 

mil' i 


.1 

K > 

ZAB 

• 1 

L 1 

ZAB 

.1 

X1 +CON ! 

ZAB 

• 1 

L | 

ZAB 

• 1 

1 

ZAB 

.1 
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2. Assign symbol at every 100g words of zeroed storage: 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

16 

30 


BUF 

PI 

USE 

MACRO 

IRP 

8SSZ 

IRP 

ENOM 

BUF 

STORAGE 

PI 

PI 

100B 

(P*e«R«S*T) 



p : ""i 

0 - £ 
R E 

s e 

T fc 

IRP 

SSZ ] 

SSZ 1 

SSZ 1 

SSZ 1 

SSZ 1 

IRP 

ENOM 

PtQ»R»S« T 

00B 

00B 

00B : 

00B 

00B 

BUF .1 

BUF .1 

RUF . 1 

BUF .1 

BUF .1 

BUF .1 

BUF .1 

rtPPiP- : -'P'' BUF .1 


5.5 SYSTEM MACRO AND OPDEF DEFINITIONS 


Definitions of such general usefulness that they should be available to any program without each 
program defining them can be placed on the system text file as system macros or can be placed on 
a file accessible through an XTEXT pseudo instruction. 


System macros provide for such system functions as reading and writing files and specifying parameters 
for file environment tables, etc. Systems macro definitions are available to COMPASS for each 
assembly. The programmer can use a macro call for a system macro at any time in his program. 
Descriptions of system macros are given in the operating system reference manual. 

Systems definitions can include any legal macro or opdef definition. An expansion of a call for a 
system definition is not normally included on the assembler listing. Use of the S qption of the LIST 
pseudo instruction (Section 4.11.1) enables listing of expansions of system definitions. 
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OPERATION CODE TABLE MANAGEMENT 


6 


The COMPASS operation code table contains the information that COMPASS requires for interpreting 
legal operation field entries for COMPASS instructions. 

When assembly begins, the operation code table contains these entries: 

Pseudo instructions (except LOCAL) 

CPU symbolic instructions (Section 8.4) 

CMU symbolic instructions (Section 8.5) 

PPU symbolic instructions (Chapter 9) 

System macro and opdef definitions 

The MACRO, MACROE, and OPDEF pseudo instructions (chapter 5) cause entries to be made in this 
table. In addition, the programmer has the capability of creating entries through the following 
instructions discussed later in this chapter: 

CPOP CPU operation 

PPOP PPU operation 

OPSYN Synonymous PPU or pseudo operation or macro 

CPSYN Synonymous CPU operation or opdef 

If a new entry redefines an instruction already in the table, the obsolete entry is not physically removed 
from the table. Instead, it is saved so that the table canbe reconstructed between assemblies. 
COMPASS reconstructs the operation code table using all the original system macros, opdefs, pseudo 
instructions, and symbolic machine instructions. No programmer-created entry is preserved from 
assembly to assembly. The number of entries in the table is limited to 4123. 

The only pseudo instructions that logically remove entries from the operation code table are PURGMAC 
and PURGDEF. 

Entries in the operation code table are in two distinct formats permitting a logical division of the 
table. One type of entry permits identification of an instruction by finding a match for the contents of 
the operation field, thus, it provides mnemonic recognition. The other type of entry is looked at only 
if the search for a mnemonic operator fails to yield a match during a CPU assembly. 

This type of entry provides for recognition of an instruction according to its syntax. COMPASS 
analyzes the statement to be interpreted, determines the syntax of the operation and variable subfields, 
and again searches the table. 
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Instructions recognized in the mnemonic search and the information provided to the assembler for 
each instruction are as follows r 


Pseudo instructions 
PPU symbolic instructions 
Instructions described through PPOP 
Macro instructions 

Instructions described through OPSYN 


The entry contains addresses to routines that perform 
pass one and pass two operations 

The entry describes the format of the instructions to 
be assembled 

The entry describes the format of the instruction to 
be assembled 

The entry directs the assembler to the location of the 
saved definition 

The entry is a copy of the synonymous entry 


For a PPU assembly, a failure to find an entry for a mnemonic operator causes an operation code error. 
For a CPU assembly, however, if the search for the mnemonic operator does not yield a match, 
COMPASS searches the operation code table again for an entry with a matching syntax. Instructions 
recognized in the syntactical search and the information provided to the assembler for each instruction 
are as follows: 


CPU symbolic instructions 


Instructions described through CPOP 
Instructions defined through OPDEF 
Instructions described through CPSYN 


The entry describes the format of the CPU instruction 
to be assembled 

The entry describes the format of the CPU instruction 
to be assembled 

The entry directs the assembler to the location of the 
definition 

The entry is a copy of the synonymous instruction 
The action taken depends on the synonymous entry 


If, following the second search of the operation code table, the statement still has not been identified, 
the assembler takes the following action: 


For a PPU assembly, it generates a 24-bit instruction of which the first 12 bits are zero. 

For a CPU assembly, it generates a 30-bit zero instruction. 

Although OPSYN and CPSYN pseudo instructions provide a means of rendering more than one 
instruction synonymous, only instructions of the same type can become synonymous. The logical 
division of the table between the two types of entries prevents mnemonically identified instructions from 
being made synonymous with syntactically identified instructions. 

When a MACRO, MACROE, PPOP, or OPSYN creates an entry for a mnemonic name that is already 
in the table for a different instruction, the new entry takes precedence over the old entry. Similarly, 
when a OPDEF, CPOP, or CPSYN redescribes a syntax already in the table for a different instruction, 
the new entry takes precedence over the old entry. As a result, the order of precedence for operation 
field recognition is, from highest to lowest: 

1. Programmer-created entries for mnemonically identified instructions 
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2. System macros, pseudo instructions, PPU symbolic machine instructions, and CMU 
instructions other than the IM instruction. 

3. Programmer-created entries for syntactically identified instructions 

4. CPU symbolic instructions and the CMU IM instruction 
Example: 


The following example illustrates a special case in which a macro name takes precedence over one 
form of a machine instruction, i. e., the form using SB4 as an operation code. 


LOCATION 


OPERATION 


VARIABLE 


COMMENTS 


I 


II 18 


30 


SB4 


MACRO 


Pi,P2 


DEFINE MACRO NAMED SB4 


ENOM 


SB4 Al+ABLE 

S83 A1+ABLE 


CALL TO MACRO. NOT CPU INSTRUCTION 

MACHINE INSTRUCTION 


SB4 


OPSVN 


NIL 


I DISABLES MACRO BUT DOES NOT 
.RESTORE NORMAL USE OF SB4 
| AS AN OPERATION C00E. EVEN IF 
I IT HERE REDEFINED HITH 0P0EF 
I IT WOULD NOT BE RECOGNIZED. 

THE MACRO FORM ALWAYS TAKES 
PRECEDENCE. 


PURGMAC 


SB4 


RESTORES NORMAL USE OF SB4 


6.1 MNEMONICALLY IDENTIFIED INSTRUCTIONS 

Mnemonically identified instructions include all pseudo instructions, macro instructions, and PPU 
symbolic instructions whether system or programmer defined. PPOP, OPSYN, NIL, and PURGMAC 
provide the programmer with a means of creating or removing operation code table entries that are in 
the mnemonically identified format. 


6.1.1 PPOP - PPU OPERATION CODE 

The PPOP pseudo instruction defines the operation and variable fields of a PPU symbolic machine 
instruction and creates an operation code table entry for the instruction. COMPASS generates an 
octal machine instruction of the defined format whenever the PPU instruction described by the PPOP 
instruction is used. If the operation code table already contains an entry for the name, the new 
definition takes precedence over the old during assembly of the subprogram or until it is redefined. 
No error is flagged. Any illegal parameter in PPOP causes COMPASS to ignore the PPOP and issue 
a 7-type error flag. 
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Format: 


tOCATION 

OPERATION 

VARIABLE SUBFIE1DS 


name 

PPOP 

ctl, val, type 



name Mnemonic name, 1-8 characters 

ctl Control of instruction assembly 

etl Significance 

0 Illegal; if used, COMPASS ignores the PPOP 

1 24-bit instruction with 12-bit address and no indexing 

2 12-bit instruction with signed relative address or absolute address 
(e.g., UJN) 

3 24-bit instruction with 18-bit address (e. g., LDC) 

4 12-bit instruction with 6-bit address (e. g., LDN) 

5 24-bit instruction with 12-bit address and optional indexing 

(e. g., LDM) 

6 12-bit instruction with signed relative address (e. g., SHN) 

7 24-bit instruction with 12-bit address and required second 

field (e. g., IAM) 

val An evaluatable expression specifying the octal 4-digit aeration code value; 

usually, only the two leftmost digits are significant. If the assembly base is M, 
the field is assumed to be octal. 

type An evaluatable expression specifying an integer value that COMPASS interprets 

as follows: 

6 


7 


other or 
omitted 


Restrict the instruction being defined to the CYBER 170 Series, 
CYBER 70/Models 71, 72, 73, and 74; COMPASS sets an error 
flag if the instruction being defined is used in a CYBER 70/ 
Model 76 PPU assembly. 

Restrict the instruction being defined to the CYBER 70/Model 76; 
COMPASS sets an error flag if the instruction being defined is 
used in a CYBER 170 Series, CYBER 70/Model 71, 72, 73, or 
74 PPU assembly. 

The instruction is not restricted to either machine type. 

If the base is M, type is assumed to be octal. If type is omitted, 
the comma preceding it can be omitted also. 
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Example: 


7311 


Code Generated 


0«*0 


IS 

40 


5415 0040 


LOCATION 


LA 

C 

STM 


OPERATION 


PERISH 

RASE 


FQU 

POU 

PPOP 


STM 


VARIABLE 


COMMENTS 


|30 


15 

40 

5*5400+LA 


6.1.2 OPSYN - SYNONYMOUS MNEMONIC OPERATION 

The OPSYN pseudo instruction makes a name in the location field of the OPSYN synonymous with the 
macro, pseudo instruction or PPU mnemonic name specified in the variable field. The size of the 
operation code table is the only limit to the number of instructions that can be made synonymous. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

namej 

OPSYN 

name 2 


The name in the variable subfield must be previously defined as a standard instruction code. After an 
OPSYN, either name produces equivalent results. If the location field specifies a previously defined 
macro or operation code, the new definition takes precedence over the old without notification. Thus, 
a macro defined by a name that is subsequently used in an OPSYN location field is not called when 
the macro name is used in the operation field. The instruction actually called is the instruction 
named in the variable subfield of the OPSYN. On the other hand, the old macro definition is not lost 
and can be restored by purging the new definition with PURGMAC. 


Example: 


1. An operation named CALL is synonymous with RJM. 


1 

LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


11 

18 

1 30 




CALL 

OPSYN 

« 

RJM 

-1- 

1 

1 

1 





CALL 

=XSUBR= 

1 

'PRODUCES 

1AS IF IT 

SAME 

HERE 

RESULTS 

AN RJM 
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2. In the following example, a programmer wishes to use a macro named LJM for part of the 
program and use the real LJM for the remainder of the program. 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

| 30 


LJM. 

OPSYN 

LJM 

[save original definition AS LJM - 



PURGMAC 

• 

LJM 

PURGE ORIGINAL DEFINITION 

1 


LJM 

MACRO 

• 

XX 

1 

1 

1 

| 


LJM 

• 

ENDM 

*“Y 

1 

1 

r 



• 


1 

' |C00E USING LJM MACRO 


LJM 

OPSYN 

LJM. = 

1 

(RESTORES ORIGINAL LJM 



• 


1 

'[CODE USING ORIGINAL LJM 



• 




6.1.3 NIL-DO NOTHING PSEUDO INSTRUCTION 

The NIL pseudo instruction resembles a no-op; it produces no code and conveys no information to the 
assembler. It is primarily designed for disabling a macro; it cannot be used with CPSYN. The 
following instructions could be used in place of NIL as nil instructions: 

ENDM 

ENDD 

ENDIF 

IRP 

Format: 


LOCATION 

OPERATION 

VARIABLE SU8FIELOS 


NIL 



A location field symbol if present is ignored. 
Example: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


It 

18 

| 30 


MACK 

OPSYN 

NIL 

-1- 

1 



• 


1 



• 


1 

| 


TAG 

MACK 

A f B,6,73 

1 



• 





- 
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The assembler interprets each call to MACK as a NIL instruction. TAG is not defined because it 
becomes the location field symbol for NIL when the statement is assembled. 


6.1.4 PURGIMAC—PURGE MACROS 

The PURGMAC pseudo instruction provides a means of disabling operation code entries for the named 
instructions for the duration of the current assembly. 

Fojrmat: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


PURGMAC 

namej, name 2 ,.... name n 


name. Names of mnemonic operation codes for macro definitions, pseudo instructions, 

or PPU instructions. 

A location field symbol if present is ignored. 


6.2 SYNTACTICALLY IDENTIFIED INSTRUCTIONS 

Syntactically identified instructions apply to CPU assemblies only. The CPOP and CPSYN pseudo 
instructions create operation code table entries for instructions that are to be identified through 
recognition of their syntax, rather than through the contents of the operation field only. 


6.2.1 CPOP - CPU OPERATION CODE 

The CPOP pseudo instruction describes the syntax of a new CPU symbolic machine instruction and 
creates an operation code table entry for the instruction. An instruction of the defined format is 
generated whenever the CPU instruction described by the CPOP instruction is used. If the operation 
code table already contains an entry for the instruction, the new definition takes precedence over the 
old during assembly of the subprogram. Any illegal parameter in CPOP causes COMPASS to ignore 
the CPOP and issue an error flag. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sytx 

CPOP 

ctl, val, reg, type 


sytx The syntax consists of a mnemonic operator and variable field descriptors. 

The mnemonic operator consists of two characters. The first can be any 
character except blank. The second character can be a register designator: 

A, B, or X, in which case, the operation field of the instruction is recognized 
as cAn, cXn, or cBn, (c is a unique character; n is 0-7); or the second 
character can be any other character except blank, in which case the operation 
field of the instruction is recognized simply by a two-character mnemonic, such 
as EQ. 
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The variable field descriptors define the order of appearance of all registers, 
expressions, and subfield separators that comprise the variable field of the 
instruction being described. It consists of none, one, two, or three of the 
following 22 subfield descriptors. Q represents an expression. An r represents 
a register letter (A, B, or X). A comma separates two descriptors; a blank 
terminates the syntax. 


void 

Q 

r 

rQ 

-r 

-rQ 

r l +r 2 

V r 2 Q 

' r i +r 2 

' -V r 2 Q 

r l* r 2 

r l* r 2 Q 

~ r i* r 2 

“ r i* r 2 Q 

r l /r 2 

r l/r 2 Q 

“ r l /r 2 

-r i /r 2 Q 

V r 2 

r r r 2 Q 

- r r r 2 

- r r r 2 Q 


For example, to describe -X3*B1, the descriptor, -r i*r 2 , would be written as -X*B whereas, to 
describe B2+ALPHA, the descriptor rQ would be written as BQ. 


ctl 


Control of instruction assembly. 


ctl 


Significance 


0 

1 

2 

3 

4 

5 

6 

7 


15-bit instruction 
30-bit instruction 

15-bit instruction, force upper before assembly 
30-bit instruction, force upper before assembly 
15 bit instruction, force upper after assembly 
30-bit instruction, force upper after assembly 

15-bit instruction, force upper before and after 
assembly 

30-bit instruction, force upper before and after 
assembly 
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val An evaluatable expression specifying a 9-bit operation code; if the base is M, 

vai is assumed to be octal. 

re £ Three octal digits specifying the order from left to right into which register 

numbers are to be inserted into the i, j, k portions of a 15-bit instruction, or 
into the i and j portions of a 30-bit instruction. If the assembly base is M, 
reg is assumed to be octal. 

1 Register number obtained from operation field 

2 Number of second register or only register in 

variable field 

3 Number of first of two registers in variable field 

0 Set field to 0 

type An evaluatable expression specifying an integer value that COMPASS interprets 

as follows: 

6 Restrict the instruction being defined to the 6000 Series, CYBER 
170 Series and CYBER 70/Models 71, 72, 73, and 74; COMPASS 
sets an error flag if the instruction being defined is used when 
MACHINE 7 has been specified. 

7 Restrict the instruction being defined to the 7600 or the CYBER 70/ 
Model 76; COMPASS sets an error flag if the instruction being 
defined is used when MACHINE 6 has been specified. 


other The instruction is not restricted to a machine type, 
or 

omitted 

If base is M, type is assumed to be octal. If type is omitted, the comma 
preceding it can be omitted also. 


Example: 


722 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 




1 


11 

18 

1 30 





SAX + B 

CHOP 

0,5308,1328 

'DEFINES 

i 

SAI 

XJ+BK 



SXXQ 

CROP 

• 

1,7208,1203 

[defines 

1 

1 

SXI 

XJ+K 

53731 



• 

5>A7 

X 3+81 

1 

1 

1 



7231000003 


TAG 

SX3 

X 1+3 

1 

1 
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6.2.2 CPSYN - SYNONYMOUS CPU INSTRUCTION 


The CPSYN pseudo instruction renders an instruction with the syntax given in the location field 
synonymous with the instruction having the syntax specified in the variable field. The only limit to 
the number of CPU instructions that can be made synonymous is the size of the operation code table 
(4123 entries). 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sytx 1 

CPSYN 

sytx 2 


sytx Syntax of a CPU instruction (see CPOP for legal forms). If this syntax is 

1 already in the operation code table, the table entry for sytx 2 takes precedence 

over the old table entry for sytx^ without notification. 

sytx^ Syntax of a CPU instruction for which there must be an entry in the operation 

code table. Following the CPSYN, an instruction in either sytx 1 or sytx 2 
produces an octal instruction of the format described by the entry for sytx 2 - 

6.2.3 PURGDEF —PURGE CPU OPERATION CODE 

The PURGDEF pseudo instruction provides a means of disabling syntactically-identified operation code 

entries for the duration of the current assembly. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


PURGDEF 

sytx 


sytx Syntax of a CPU instruction (see CPOP for legal forms). 

A location field symbol, if present, is ignored. 
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MICROS 


7 


The COMPASS micro capability enables the programmer to symbolically refer to a defined character 
string. When used in conjunction with IFC, DUP, STOPDUP, and SET pseudo instructions, micro 
strings provide for varied manipulation of character strings — testing for a particular character, 
counting characters, concatenation of strings, etc. 

Use of a micro definition requires two steps: definition of the character string, and substitution. In 
this discussion, substitution rather than definition is discussed first so that the reader has a better 
understanding of how a definition is used when it is described. 

7.1 MICRO SUBSTITUTION 

Wherever a micro name between micro marks (^) occurs in a statement other than a comment 
line (* in column 1), the assembler substitutes the micro before it interprets the statement. If 
column 72 of the last statement read is exceeded as a result of micro substitution, the assembler creates 
up to a maximum of 9 continuation statements, beyond which it discards excess characters without noti¬ 
fication on the listing. No replacement takes place if the micro name is unknown or if one of the micro 
marks has been omitted. If the micro name is unknown, the assembler flags a nonfatal assembly error. 
If the micro name is null (that is, the two micro marks are adjacent), then 

1. Both micro marks are deleted, and 

2. No error flag is set 


Example: 

A micro identified as NAM is defined as the 7 characters: 
AODRESS 


A reference to NAM is in the variable field of a line: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


II 

18 

1 30 


LOC 

SAl 

*NAM*+4 



However, before the line is interpreted, COMPASS substitutes the definition for NAM producing the 
following line: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

1 30 


LOC 

SAl 

ADDRESS+ 4 ‘ 


NOTE 
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Unless the A option of the LIST pseudo instruction is 
enabled, the listing depicts the instruction as it was 
before the substitution took place. 
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7.2 MICRO DEFINITION 


Pseudo instructions specifically designed for the purpose of defining micros are: MICRO, OCTMIC and 
DECMIC. In addition, the following pseudo instructions optionally define micros: BASE, CODE, and 
QUAL. Also, system or built-in micros are automatically defined by COMPASS at the start of each 
subprogram assembly. 

7.2.1 MICRO - DEFINE MICRO 

The MICRO pseudo instruction defines a character string and assigns a name to that string. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

micname 

MICRO 

n^ng, dstringd 


micname 


Name by which definition is called; 1-8 characters 


n l 


dstringd 


Absolute evaluatable expression specifying starting character in string; when the 
base is M, COMPASS assumes that n^ is decimal. 

Absolute evaluatable expression specifying number of characters; when the base 
is M, COMPASS assumes that n. is decimal. 

Li 

Delimited character string. The delimiter d is a character not used in the 
string. 


Counting the first character after d as character 1, the assembler forms the string by extracting n 2 
characters starting with character n^. If the second delimiting character occurs before count n 2 is 
exhausted, the defined string terminates at that point. If is greater than zero and n 2 is omitted, zero, 
or negative, the defined string includes all the characters from n^ to the closing delimiter (see second 
example). 

If n^ is omitted, zero, or negative, the defined string is empty; no substitution takes place when the micro 
name is referred to. That is, n 2 and the character string are ignored. 

A previously defined micro can be a part of a micro definition; one micro can be defined as a substring 
of another (see third example). 

A micro can combine previously defined micros or can be a subset of another. Also, a micro defined 
originally as one character string can be redefined subsequently with a different character string. After 
the redefinition, the original character string is inaccessible. 

If n-^ or n2 is negative, the assembler generates a 7-type error. 

Examples: 

1. The following MICRO defines NAME as the 19 characters beginning with A and ending with G. 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


NAME 

MICRO 

1,19,*ALPHANUMERIC STRING* 
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2. This example illustrates a blank character count. The defined string begins with A and is 
terminated by the closing delimiter. 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 


MICKY 

MICRO 

1, ^ALPHANUMERIC STRING* 


3. One micro can be defined as a substring of another. 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 

4. 

NAMl 

• 

• 

• 

NAM2 

One mici 

MICRO 

• 

• 

• 

MICRO 

*o can cor 

1,25,*MAJ0R [ALPHANUMERIC STRING* 

* 1 

• 1 

• 1 

7 , ,**NAM1** iSAMF STRING AS IN EXAMPLES 1 AND 

nbine others. 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 

5. 

NAMl 

NAM2 

NAM3 

A micro 

MICRO 

MICRO 

MICRO 

name can 

1,12,SALRHANUMFRICS 

1,7,X STRINGX 

1, ,+*NAMl**NAM2*,- COMBINES NAMl AND NAM2 

be redefined. 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 ! 30 


MSG 

• 

• 

• 

MSG 

• 

i 

• 

• 

MICRO 

• 

• 

• 

MICRO 

• 

• 

• 

1,6,*STRING*| 

• 1 1 

. j. [CODE USING FIRST DEFINITION 

• J l 

1, 19,*ALPHANUMFRiC *MSG** 

* 1 | 

. L .CODE USING SECOND DEFINITION. 

. J 'FI PS T DEFINITION IS INACCESSIBLE. 


6. Micro substitution takes place before a line is assembled or examined for syntax. Thus, 
the following is possible. 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


n 

18 

30 

* 

NAM 

NAM# 1 

MICRO 

• 

• 

• 

1,25,* LOC 

SAl ADDRESS+* 


LOC 

SA1 

AODRgSS+1 
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7.2.2 DECMIC - DECIMAL MICRO 


Using a decimal conversion, the DECMIC pseudo instruction converts the expression into a character 
string to be saved under the name specified. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

micname 

DECMIC 

aexp,n 


micname Name by which definition is called; 1-8 characters 

aexp Absolute evaluatable expression 

n Optional absolute evaluatable expression specifying number of characters 

in the defined string. The defined string is a maximum of 10 characters 
regardless of the magnitude of n. When base is M, COMPASS assumes that 
n is decimal 

If n is omitted or has a zero value, the micro contains the number of characters 
indicated by the conversion to a maximum of 10 characters. If the converted 
expression has more than n (or 10) digits, the most significant digits are 
truncated. If the value has fewer than n digits, the string is right justified and 
filled with leading zeros. All numbers are treated as positive. 


Example: 

B has the value 1024 decimal or 2000 octal before conversion. 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 Uo 


V 

OFCMIC 

MTC90 

«,6 i 

WUHh 


7.2.3 OCTMIC - OCTAL MICRO 

Using an octal conversion, the OCTMIC pseudo instruction converts the value of the expression into a 
character string to be saved under the name specified. 
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Format: 


LOCATION OPERATION VARIABLE SUBFIELDS 

micname OCTMIC aexp.n 

micname Name by which definition is called; 1-8 characters 

aexp Absolute evaluatable expression 

n Optional absolute evaluatable expression specifying number of characters 

in the string. The defined string is a maximum of 10 characters regardless 
of the magnitude of n. When base is M, COMPASS assumes n as a decimal. 
If n is omitted or has a zero value, the micro contains the number of 
characters indicated by the conversion to a maximum of 10 characters. 

If the converted expression has more than n (or 10) digits, the most significant digits are truncated. 

If the value has fewer than n digits, the string is right justified and filled with leading zeros. All 

numbers are treated as positive. 

Example: 



7.3 PREDEFINED MICRO NAMES 

Several standard micros are predefined by the COMPASS assembler. They are available for every 
assembly. The programmer simply writes the micro reference as desired. 

These micros are automatically defined at the beginning of each assembly, and have the default values 
specified below until they are redefined by the programmer; thereafter, the programmer's definition 
holds until the start of the next assembly. 

7.3.1 DATE 

The DATE micro contains the current date in 10 characters in one of the following forms as obtained 
from the operating system: 

Ayr/mo/dy. or Amo/dy/yr. 

The micro reference is ^DATE^. 
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7.3.2 JDATE 


The automatic value of the JDATE micro is five digits yyddd, where yy is the year and ddd is the day 
of year at the time of assembly. Thus, JDATE is the Julian date form of DATE. 

The micro reference is ^JDATE^. 


7.3.3 TIME 

The TIME micro contains the current time of day in 10 characters in the following form as obtained 
from the operating system: 

A hr. min. sec. 

The micro reference is ^TIME^. 

Example: 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

1 30 



TITLE 

PROGRAM 

ASSEMBLED ON *0ATE* AT*TIME* 


7.3.4 BASE 

The automatic value of the BASE micro is a single letter D, M, or O, corresponding to the number 
base currently in effect (specified by the most recent BASE pseudo instruction); it is initially D. 

The micro reference is ^BASE^. 

7.3.5 CODE 

The automatic value of the CODE micro is a single letter A, D, E, O, or I, corresponding to the 
character code currently in effect (specified by the most recent CODE pseudo instruction); it is 
initially D. 

The micro reference is ^CODE^. 


7.3.6 QUAL 

The automatic value of the QUAL micro is 0 to 8 characters comprising the qualifier symbol 
currently in effect (specified by the most recent QUAL pseudo instruction); it is null initially and 
whenever the blank qualifier is in effect. 

The micro reference is ^QUAL^. 
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7.3.7 SEQUENCE 


The automatic value of the SEQUENCE micro is 18 characters comprising the sequence field 
(columns 73-90) of the first line of the COMPASS source statement most recently read from the main 
source input file. Thus, if the current statement was read from the main source input file, SEQUENCE 
is the sequence field of the first line of the statement. However, if the current statement is generated 
(i. e., part of a macro call expansion, DUP expansion, etc.) or is read from a different file via the 
XTEXT pseudo instruction, then SEQUENCE is the sequence field of the first line of the statement most 
recently read from the main source input file. 

The micro reference is ^SEQUENCE^. 


7.3.8 MODLEVEL 

The automatic value of the MODLEVEL micro is the value (up to 9 characters) specified by the ML pa¬ 
rameter on the COMPASS control statement. If no ML parameter is present, the automatic value of the 
MODLEVEL micro is equal to that of the JDATE micro. When COMPASS is called by a compiler to 
process embedded COMPASS subprograms, the automatic value of the MODLEVEL micro is supplied 
by the calling compiler. The MODLEVEL micro is intended to be used when assembling a compiler 
(or COMPASS itself), to provide the compiler modification level to be placed in word 6 of each PRFX 
table in the binary output written by the compiler. 

The micro reference is /MODLEVEL^. 


7.3.9 PCOMMENT 

The automatic value of the PCOMMENT micro is the value specified by the PC parameter on the 
COMPASS control statement, with characters truncated from the right or blanks appended to the right, as 
necessary, so that the micro's length is exactly 30 characters. If no PC parameter is present, the auto¬ 
matic value of the PCOMMENT micro is 30 blanks. When COMPASS is called by a compiler to process 
embedded COMPASS subprograms, the automatic value of the PCOMMENT micro is supplied by the call¬ 
ing compiler. The PCOMMENT micro is intended to be used in a COMMENT pseudo instruction to 
specify words 8 through 10 of the PRFX table in the binary output. It may also be used, in conjunction 
with the *F special symbol, to determine compiler options (debug mode, rounded arithmetic, etc.) in 
effect at the time of assembly. 

The micro reference is ^PCOMMENT^. 
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CPU SYMBOLIC MACHINE INSTRUCTIONS 


8 


COMPASS recognizes symbolic notation for all CYBER 170 Series Central Processor Unit (CPU) 
instructions, all CYBER 70 Series Central Processor Unit instructions, all 7600 Central Processor Unit 
instructions, and all 6000 Series Computer Systems Central Processor Unit instructions. 

The assembler identifies each symbolic instruction according to its syntax and generates a one-parcel 
15-bit instruction or a two-parcel 30-bit instruction. The object code for an instruction is generated in the 
block in use when the instruction is encountered. 


8.1 MACHINE INSTRUCTION FORMATS 

Figures 8-1 and 8-2 illustrate the formats for CPU 15-bit and 30-bit instructions generated by the 
assembler. 



14 08 05 02 00 

Figure 8-1. CPU 15-Bit Instruction Format 


r 

fm 

i 

j 1 ... 

K 

“1 

29 


23 

20 17 14 


00 


Figure 8-2. CPU 30-Bit Instruction Format 


fm 6-bit instruction code 

fmi 9-bit instruction code 

i 3-bit code (0 through 7) specifying one of eight designated registers (for example, Ai) 

j 3-bit code (0 through 7) specifying one of eight designated registers (for example, Bj) 

k 3-bit code (0 through 7) specifying one of eight designated registers (for example, Xk) 

K 18-bit integer value used as an operand, address of an operand, or branch destination address 

jk 6-bit integer value specifying a shift count or mask count 

Figure 8-3 illustrates possible arrangements of one- and two-parcel instructions in a 60-bit CPU instruction 
word. Generally, the assembler does not allow a two-parcel instruction to begin in the fourth parcel of a 
word. 
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First Second Third Fourth 


Parcel (Parcel 0) Parcel (Parcel 1) Parcel (Parcel 2) Parcel (Parcel 3) 



59 29 00 


Figure 8-3. Arrangements of Instructions in a 60-bit CPU Word 


I When a two-parcel instruction begins in the last parcel of a word, the CYBER 170/Model 175, 176, 740, 

750, or 760, and the CYBER 70/Model 76 or 7600 executes it as if the instruction word had a fifth parcel 
containing all zeros. On the CYBER 170/Model 171, 172, 173, 174, 720, or 730, and the CYBER 70/Model 
71, 72, or 73, or 6400, this condition causes an error exit. On the 6600 or CYBER 70/Model 74, the CPU 
takes the first parcel of the current instruction. 

Before it assembles an instruction that must begin in the first parcel (forced upper) and after it assembles 
an instruction that requires the instruction following it to be forced upper, the assembler completes a word 
as follows: 

• Lower 15 bits remain They are packed with a one-parcel NO (pass) instruction. 

• Lower 30 bits remain They are packed with a two-parcel SB0 B0+K instruction. 

• Lower 45 bits remain They are packed with a NO instruction and an SB0 B0+K instruction. 


8.2 INSTRUCTION EXECUTION 


8.2.1 6600/6700* AND CYBER 70/MODEL 74 EXECUTION 

After an exchange jump start by a peripheral processor unit tPPU) and CPU program, CPU instructions 
issue automatically in the original sequence, to an 8-word instruction stack. The stack can hold a program 
loop consisting of up to twenty-six 15-bit instructions and one 30-bit instruction. 

Instructions are read from the stack, one at a time, and issued to the functional units (table 8-1) for 
execution. A scoreboard reservation system in CPU control keeps a current log of which units and 
operating registers are reserved for computation results from functional units. 


t 


The 6700 also includes a 6400-type central processor unit 
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TABLE 8-1. CYBER 70/Model 74 and 6600/6700 FUNCTIONAL UNITS 


UNIT 

GENERAL FUNCTION 

Branch 

Handles all jumps or branches from the program. 

Boolean 

Handles the basic logical operations of transfer, logical product, 
logical sum, and logical difference. 

Shift 

Executes operations basic to shifting. This includes left (circular) 
and right (end-off sign extension) shifting, and normalize, pack, and 
unpack floating point operations. The unit also includes a mask 
generator. 

Floating Add 

Performs single or double precision floating point addition and 
subtraction on floating point operands. 

Long Add 

Performs addition and subtraction of two 60-bit fixed point operands 

Floating Multiply 

Performs single or double precision floating point multiplication on 
floating point operands 

Floating Divide 

Performs single precision floating point division of floating point 
operands; also counts the number of 1 bits in a 60-bit word. 

Increment 

Performs one's complement addition and subtraction of 18-bit operands. 


Each functional unit executes several instructions, but only one at a time. Some branch instructions 
require two units, the second unit receives direction from the branch unit. 


The rate of issuing instructions varies from the maximum of one instruction every 100 nanoseconds 
(one minor cycle). Sustained issuing at this rate may not be possible because of functional unit and CM 
conflict or because of serial rather than simultaneous operation of units. Program run time can be 
decreased by efficient use of the units. Instructions that are not dependent on previous steps may be 
arranged or nested in program areas where they may be executed concurrently with other operations to 
eliminate dead spots in the program and increase the instruction issue rate. 

The following steps summarize instruction issuing and execution: 

• An instruction is issued to a function unit when: 

Specified functional unit is not reserved 

Specified result register is not reserved for a previous result 

• Instructions are issued to functional units at minor cycle intervals when no reservation conflicts 
are present. 

• Instruction execution starts in a functional unit when both operands are available. Execution is 
delayed when an operand is a result of a previous step which is not complete. 

• No delay occurs between the end of a first unit and the start of a second unit which is waiting for 
the results of the first. 
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• After a branch instruction no further instructions are issued until instruction has been executed. 
In the execution of a branch instruction, the branch unit uses: 

Increment unit to form the instructions that branch to K + Bi and branch to K if Bi ... 

Long add unit to perform the instructions that branch to K if Xj — 

Time spent in the long add or increment units is part of total branch time. 

Read central memory access time is computed from the end of increment unit time to the time an 
operand is available in X operand register. Minimum time is 500 nanoseconds assuming no central 
memory bank conflict. 


8.2.2 CYBER 170/MODELS 171, 172, 173, 174, 720, 730, AND THE CYBER 70/ 

MODELS 71, 72, 73 AND 6200/6400/6500 EXECUTION 

The CYBER 170/Models 172, 173, 174, 720, and 730, and the CYBER 70/Models 71, 72, and 73, and 6200, 
6400, and 6500 systems CPU has a unified arithmetic unit, rather than separate functional units as in the 
6600 system. Instructions in the CPU are executed sequentially. 

For efficient coding in the central processor unit: 

Always attempt to place jump instructions in the upper portion of the instruction word to avoid both 
the additional time for RNI (read next instruction, 2 minor cycles) and the possibility of a memory 
bank conflict with (P + 1). 

Where possible, place load/store instructions in the lower two portions to avoid lengthening 
execution times. 

Reading the next instruction words of a program from central memory, RNI, is partially concurrent 
with instruction execution. RNI is initiated between execution of the first and second instructions of the 
word being processed. Initiating RNI operation requires two minor cycles; the remainder of the RNI 
is parallel in time with execution of the remaining instructions in the word: 
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In calculating execution times, two minor cycles are added to each instruction word in a program to cover 
the RNI initiation time. Exceptions are the return jump and the jump instructions (in which the jump 
condition is met) when they occupy the upper position of the instruction word. Since the times for these 
instructions already include the time required to read the new instruction word at the jump address, no 
additional time is consumed. 

Example: 


Jump to K (met) 

Pass 

Pass 


Add 1 

Add 2 

Load 

Store 


Instruction 

Minor Cycles Required 

Jump 

13 

Add 1 

5 

RNI Initiation 

2 

Add 2 

5 

Load 

12 

Store 

10 

Total Time 

47 minor cycles 


After RNI is initiated (between the first and second instructions of the word), a minimum of eight minor 
cycles elapses before the next instruction word is available for execution. Even if the lower order positions 
of the word should require less than eight minor cycles, a minimum of eight minor cycles is allowed. 

Example: 


Pass 


Pass 


Jump to K 
(not met) 


P + 1 


8.2.3 CYBER 170/MODELS 175, 176, 740, 750, AND 760 AND THE 
CYBER 70/MODELS 76, AND 7600 EXECUTION 

Execution of an arithmetic or logical machine instruction takes place in one of nine functional units in the 
computation section of the CYBER 170/Models 175, 176, 740, 750, or 760 and the CYBER 70/Models 76 or 
7600 CPU. Each is a specialized unit with algorithms for a portion of the CPU instruction execution. 

Table 8-2 lists the general function of each unit. A number of functional units can be in operation at the 
same time. 
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TABLE 8-2. CYBER 170/MODELS 175, 176, 740, 750, AND 760 AND THE CYBER 70/MODEL 76 

AND 7600 FUNCTIONAL UNITS 


Unit 

General Function 

Boolean 

Handles the basic logical operations of transfer, logical product, logical 
sum, and logical difference. It also performs the pack and unpack 
floating point operations. 

Shift 

Executes operations basic to shifting. This includes left (circular) 
and right (end-off sign extension) shifting, and mask generation. 

Normalize 

Performs the normalize operations. 

Floating Add 

Performs single or double precision floating point addition or subtraction 
on floating point operands. 

Long Add 

Performs integer addition or subtraction of two 60-bit fixed point 
operands. 

Floating Multiply 

Performs single or double precision floating point multiplication on 
floating point operands. 

Floating Divide 

Performs single precision floating point division of floating point 
operands. 

Population Count 

Counts the number of 1 bits in a 60-bit word. 

Increment 

Performs one's complement addition and subtraction of 18-bit operands. 


A functional unit receives one or two operands from operating registers at the beginning of instruction 
execution and delivers the result to the operating registers after performing the function. The functional 
units do not retain any information for reference in subsequent instructions. The units operate in three- 
address mode with source and destination addressing limited to the operating registers. 

Except for the floating multiply and divide units, all functional units have one clock period segmentation. 
This means that the information arriving at the unit, or moving within the unit, is captured and held 
in a new set of registers at the end of every clock period. It is therefore possible to start a new set 
of operands for unrelated computation into a functional unit each clock period even though the unit may 
require more than one clock period to complete the calculation. This process may be compared to a 
delay line in which data moves through the unit in segments to arrive at the destination in the proper 
order but at a later time. All functional units perform their algorithms in a fixed amount of time. No 
delays are possible once the operands have been delivered to the front of the unit. 

The floating multiply unit has a two clock period segmentation. Operands may enter the multiply unit 
in any clock period providing there was no multiply operation initiated in the preceding clock period. 

The floating divide unit is the only functional unit in which an iterative algorithm is executed. There is 
little segmentation possible in this unit. However, to increase execution speed, the beginning of a new 
divide operation can follow a previous divide operation by 18 clock periods for a gain of 2 clock periods. 

Instructions involving storage references for operands or program branching are difficult to time. 
Program branching within the instruction stack causes no storage references and small program loops 
can therefore be precisely timed. 
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8.3 OPERATING REGISTERS 


Twenty-four registers minimize memory references for arithmetic operands and results: 


Function 

Identity 

Length 

Number 

Operand Registers 

X0 - X7 

60 Bits 

8 

Address Registers 

A0 - A7 

18 Bits 

8 

Index Registers 

B0 - B7 

18 Bits 

8 


A register is reserved if it is the destination of an instruction that has been initiated but has not been 
completed. A register is free in the clock period (or minor cycle) following the store into it. 

8.3.1 X REGISTERS 

Eight 60-bit X registers in the computation section of the CPU designated XO, XI.X7 are the 

principal data handling registers for computation. Data flows from these registers to the SCM (CM) 
and the LCM (not ECS). Data also flows from SCM (CM) and LCM (not ECS) into these registers. 

All 60-bit operands involved in computation must originate and terminate in these registers. 

Operands and results transfer between SCM (CM) and these registers as a result of placing SCM (CM) 
into corresponding address registers. 

On the CYBER 170/Model 176, CYBER 70/Model 76 and 7600, the X registers also serve as address 
registers for referencing single words from LCM. XO is used as the LCM relative starting address 
in a block copy operation. 

8.3.2 A REGISTERS 

Eight 18-bit. A registers in the computation section of the CPU, designated as AO, Al,..., A7, are 
essentially SCM (CM) operand address registers. With the exception of AO and XO, A registers are 
associated one-for-one with the X registers . Placing a quantity into an address register Al - A5 
causes an immediate SCM (CM) read reference to that relative address and sends the SCM (CM) word 
to the corresponding operand register XI - X5. Similarly, placing a value into address register A6 
or A7 causes the word in the corresponding X6 or X7 operand register to be written into that relative 
address of SCM (CM). 

The AO and XO registers operate independently of each other and have no connection with SCM (CM). 
AO is used as the relative SCM (CM) starting address in a block copy operation and for scratch pad or 
intermediate results. 


8.3.3 B REGISTERS 

Eight 18-bit B registers in the computation section of the CPU designated as BO, Bl,... , B7 are 
primarily indexing registers for controlling program execution. Program loop counts can be incremented 
and decremented in these registers. 
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Program addresses may be modified on the way to an A register by adding or subtracting B register 
quantities. The B register also holds shift counts for pack and normalize operations and the channel 
number for channel status requests. 

BO always contains positive zero; that is, BO is held clear. Often as a programming convention, B1 
or B7 contains positive 1. See the Bl=l, the B7=l, and the R= pseudo instructions. 


8.4 SYMBOLIC NOTATION 

This section describes notation used for coding symbolic CPU machine instructions. Instructions are 
listed according to octal sequence. Instructions unique to a computer system are identified as such. 
These instructions can be assembled on any machine but will execute properly on the noted machine only. 
For details and special conditions arising during instruction execution, refer to the relevant hardware 
system reference manual. 

The location field of a symbolic machine instruction optionally contains a location symbol. When the 
symbol is present, it is assigned the value of the location counter after the force upper (if any) occurs. 

The operation field of a symbolic CPU machine instruction contains a mnemonic operator, the last two 
characters of which are often a register designator. 

The variable field contains one, two, or three subfields. For 15-bit instruction, subfields take the 
forms 


j 

r, r > 

| r is a register designator 

r op r 

-r op r ; 

op is a register operator + - * / 

±jk 

jk is an absolute expression specifying a shift count or mask bit count. If 
the expression value is in the range -60 to -0, inclusive, COMPASS adds 60 to it 
If it is less than -60 or greater than 63, COMPASS sets a warning flag and uses 
the low-order 6 bits of the expression value. 

For a 30-bit instruction, 

subfields take the forms: 

K 

The single subfield contains an absolute, relocatable, or external expression 
that does not include a register. 

r op K 

The single subfield contains an absolute, relocatable, or external expression 
that includes a register designator; op is an expression operator: 


+ - * / 

r, K 

One subfield contains a register designator, the other subfield contains an 
absolute, relocatable, or external expression that does not include a register 
designator. 

r, r,K 

Two subfields contain register designators; a third contains an absolute, 
relocatable, or external expression that does not include a register. 
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In the formats and examples, K reduces to an 18-bit value that represents one of the following in pass 
two: 

An absolute address or a word count 
An external symbol + an integer value 

An address that is relocatable relative to the program origin or common block origin. 

An address of a literal 

If K is negative, the assembler inserts the one's complement of the integer value in the K portion of the 
instruction. 


In the descriptions of the formats, +K designates that the evaluation of all nonregister elements can 
result in a positive or negative value for the expression (see section 2.8.2 Evaluation of Expressions). 
Use of +K to represent the integer portion of the expression does not imply that the first term oper¬ 
ator in the expression is an expression operator. If you consider that a and b are terms in expression 
K, then +K indicates that the sum of the values of a and b is positive and -K indicates that the sum of 
the values is negative. Thus, -K does not mean that a-b would become -a+b. 

In the following example, the symbol XRAY has the value 407 . The first term operator (-) forms the 

value 777370 . Subtracting 1 from this results in 777367 or a -K (-410 ). 

° 8 8 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

13 7212777367 

1 


11 

18 | 30 



SXl 

X2-XRAY-1 1 

1 


Unless otherwise noted, subfields can be in any order. COMPASS also allows an added degree of 
flexibility by allowing the variable subfields of an instruction to be written in the operation field with 
each subfield preceded by a comma. For example; 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


l 


11 

18 

i 30 




UXl 

1 ------ 

12,X3 i 


can be written 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

26123 



UXl,R2 

X 3 ! 


The instructions are identical to the assembler. 
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Similarly, the following instructions are regarded as identical. Use of this feature is optional, 




LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

b 42 3J1b 641 



E J 

32 , 33, < 

-1- 

1 

1 

C 42 301j 641 



E 3 >32 

33,K 

1 

1 

. 

0423J1G641 




?3 K 

1 

0423010 641 



i 

El,32,03,K 

i 

1 


8.4.1 PROGRAM STOP OR EXCHANGE JUMP INSTRUCTION 

(CYBER 170 SERIFS, CYBER 70/MODEL 71,72,73,74, AND 6000 SERIES) 

The CEJ/ME J Panel Switch determines whether this instruction causes the central processor unit to 
halt or to execute an exchange jump. The DISABLE position disables the central exchange jump or 
the monitor exchange jump. In this case, the instruction is illegal for a CYBER 170/Model 175. For 
all other systems, PS halts the central processor unit at the current step in the program. An exchange 
jump is necessary to restart the central processor unit. The ENABLE position enables the jump capa¬ 
bilities for all systems. In this case, PS causes an exchange jump to monitor address (MA) in the 
exchange package. For the CYBER 170/Model 176, the CEJ/ME J switch is ignored; exchange jumps 
are always enabled. For 6000 series systems, the CEJ/MEJ switch is ignored; PS always causes the 
central processor unit to halt. The job continues to hold a control point until the time-limit is satis¬ 
fied; at that time the job aborts. 

The contents of the location field become a sub-subtitle on the assembler listing. The assembler forces 
upper before and after assembling a PS instruction. 

Formats: CYBER 70/Model 74 or 6600/6700 Functional Unit: Branch 

CYBER 170/Model 175, 176 Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

PS 


Program stop or exchange jump to (MA) 

30 bits 

00000 00000 

PS 

K 

Program stop or exchange jump to (MA) 

30 bits 

0000K 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

0000700000 

1 


11 

18 

1 30 

II 


PS 

' - 1 - 

1 
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8.4.2 ERROR EXIT INSTRUCTION (CYBER 70/MODEL 76 OR 7600) 


ES execution is treated as an error condition and the machine sets the program range condition flag 
in the PSD register. The condition flag then generates an error exit request which causes an exchange 
jump to address (EEA). All instructions issued prior to this instruction are run to completion. Any 
instruction following this instruction in the current instruction word is not executed. When all operands 
have arrived at the operating registers as a result of previously issued instructions, an exchange 
jump occurs to the exchange package designated by (EEA). 

The i, j, and k designators, which are ignored by the computation section, are set to zero by the 
assembler. The program address stored in the exchange package on the terminating exchange jump is 
advanced one count from the address of the current instruction word (P=P+1). This is true regardless 
of which parcel of the current instruction word contains the error exit instruction. 


The error exit instruction is not intended for use in user program code. The program range condition 
flag is set in the PSD register to indicate that the program has jumped to an area of the SCM field which 
may be in range but is not valid program code. This should occur when an incorrectly coded program 
jumps into an unused area of the SCM field or into a data field. The program range condition flag is 
also set on the condition of a jump to address zero. These conditions can be determined on the basis 
of the register contents in the exchange package. The existence of an error exit condition resulting 
from execution of this instruction can thus be deduced. 


The location field of an ES instruction becomes a sub-subtitle on the assembler listing. 


Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

ES 


Error exit to EEA 

15 bits 

00000 

ES 

K 

Error exit to EEA 

15 bits 

00000 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

00000 



ES 

-1—- 

i 

i 


8.4.3 RETURN JUMP INSTRUCTION 


When this instruction is executed, an unconditional jump to the current address plus one [(P)+l ] is 
stored in the upper half of relative address K in SCM and control then transfers to K+l for the next 
instruction. The lower half of the stored word is all zeros. The instruction always branches out of 
the instruction stack and voids all instructions currently in the instruction stack. 


After the instruction is executed the octal word at K is: 
Address K 


0 4 0 0 


P + 1 


0000000000 


59 


29 


00 


Bi=Bj 
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This instruction is intended for transferring control to a subroutine between execution of the current 
instruction word and the following instruction word. Instructions appearing after the return jump 
instruction in the current instruction are not executed. The called subroutine must exit at address K 
in CM (SCM). A jump to address K of the branch routine returns the program to the original sequence. 
The assembler sets the unused j designator to zero. 

A force upper occurs after the instruction is assembled. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Branch 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: None 



Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

RJ 

K 

Return jump to K 

30 bits 

0100K 


Example: 


Code Generated 


LOCATION 

-1 

OPERATION : 

VARIABLE COMMENTS 

0100005250 + 

1 


11 

18 1 30 



RJ 

HELP ! 


8.4.4 ECS INSTRUCTIONS (CYBER 170 SERIES, CYBER 70/MODELS 71, 

72, 73, 74 OR 6000 SERIES) 

These instructions initiate either a read or write operation to transfer (Bj)+K 60-bit words between 
extended core storage (ECS) and central memory (CM). The initial ECS address is (X0)+RA ; 

the initial CM address is (A0)+RA CM . 1- ~ J 

The assembler forces upper before assembling an RE or WE instruction. 

If no error occurs, the next instruct bn executed is the first instruction in the current address plus one 

[ (P)+H. 

Three error conditions cause an error exit to the lower-order 30 bits of the instruction word containing 
the RE or WE instructions. These 30 bits should always hold a jump to an error routine. The conditions 
are: 

1. Parity errors when reading ECS. If a parity error is detected, the entire block of data is 
transferred before the exit is taken. 

2. The ECS bank from/to which data is to be transferred is not available because the bank is in 
maintenance mode, or the bank has lost power. If either of these conditions exists on an 
attempted read or write, an immediate error exit is taken. 

3. An attempt to reference a nonexistent address. On an attempted write operation, no data 
transfer occurs and an immediate error exit is taken. If the attempted operation is a read, 
and addresses are in range, zeros are transferred to central memory. This is a convenient 
high-speed method of clearing bbcks of central memory. 

On a CYBER 170 Model 176, action in the case of error depends on the operating system being run. 
Under SCOPE 2, error processing is just as for the RL and WL instructions (section 8.4. 5). Under 
NOS 1, an error causes the job to abort. Under NOS/BE 1, an error exit to the lower 30 bits of the 
instruction word takes place. This action is provided by the operating system, not by the hardware. 

For additional information about these instructions, refer to the 7030 Extended Core Storage Reference 
Manual. 
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Formats: Functional Unit: None 


Operation 

Variable 

Description 

— 

Size 

Octal Code 

RE 

Bj 

Read extended core storage 

30 bits 

OlljO 00000 

RE 

K 

Read extended core storage 

30 bits 

011 OK 

RE 

Bj±K 

Read extended core storage 

30 bits 

OlljK 

WE 

Bj 

Write extended core storage 

30 bits 

012j0 00000 

WE 

K 

Write extended core storage 

30 bits 

0120K 

WE 

Bj±K 

Write extended core storage 

30 bits 

012jK 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


J 


H 

18 

1 30 

0110002000 



RF 

2000B 

-1- 

1 

0117001000 



PE 

n7 + 1.OO0B 

1 

1 

012F001000 



WF 

1000B+B5 

1 

1 


8.4.5 LCM BLOCK COPY INSTRUCTIONS (CYBER 170/MODEL 176, 

CYBER 70/MODEL 76 OR 7600 

Block copy instructions move quantities of data between LCM and SCM as quickly as possible. All 
activity in the CPU other than I/O word requests is stopped during a block copy operation. All 
instructions issued prior to a block copy instruction are executed to completion and no further 
instructions issue until the block copy is nearly completed. As a result of these restrictions the 
data flow between LCM and SCM can proceed at the rate of one 60-bit word each clock period. 

When an I/O multiplexer word request for SCM occurs during this transfer, the data flow is 
interrupted for one clock period. The I/O word address is inserted in the stream of addresses to 
the SAS, and the addresses for the block copy are resumed with a minimum of a one clock period delay. 
An additional delay will occur if the I/O reference causes a bank conflict in SCM. 

The length of the block is determined by adding the quantity K to the contents of register Bj. Either 
quantity may be used as an increment or decrement. The result is an 18-bit integer which is truncated 
to a 10-bit quantity. Thus, a maximum block size is 1777 g . (For example, if the result of the add is 
003000g, the instruction transfers lOOOg words.) No error indications are given when this occurs unless 
the field length is exceeded causing a block range error. If the block length is zero, the instruction 
becomes a do-nothing instruction; the condition is not error flagged. 

Relative source or destination addresses begin at (AO) in the SCM and at the relative LCM address 
determined from the lowest order 19 bits of (XO). If (XO) is negative, the 19 bits are treated as a 
positive integer. If the sum of (X0^ g _Qg) an< ^ *"he block coun t exceeds the (FLL), the copy is not 
executed and the LCM block range condition flag is set in the PSD register. Similarly, if the sum of 
(AO) and the block exceeds (FLS), the copy is not executed and the SCM block range condition flag is 
set in the PSD register. 

COMPASS will truncate a block copy instruction if it begins in the last parcel and its K field is zero. 
Under such conditions, a block copy is a 15-bit instruction. 
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Any error condition occurring during execution of a block copy instruction causes a flag to be set in the 
PSD register but does not interrupt the block copy instruction. No further instructions are issued during 
block transfer of data. Instructions already issued are completed; all other activity, with the exception 
of I/O word requests, stops. 

On a CYBER 170 Model 176, if no error takes place, the next instruction executed is the first instruction 
in the current address plus one [(P) + 1]. Action in the case of error depends on the operating system 
being run. Under SCOPE 2, error processing is just as for any program running on the CYBER 70 
Model 76, as described in the SCOPE 2 Reference Manual listed in the preface. Under NOS 1, an error 
causes the job to abort. Under NOS/BE 1, an error exit to the lower 30 bits of the instruction word takes 
place. This action is provided by the operating system, not by the hardware. 


Format: Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

RL 

Bj 

Block copy (Bj) words from LCM to SCM 

30 bits 

OlljO 00000 

RL 

K 

Block copy (K) words from LCM to SCM 

30 bits 

011 OK 

RL 

Bj+K 

Block copy (Bj) + K words from LCM to 

SCM 

30 bits 

OlljK 

WL 

K 

Block copy (K) words from SCM to LCM 

30 bits 

0120K 

WL 

Bj 

Block copy (Bj) words from. SCM to LCM 

30 bits 

012j0 00000 

WL 

Bj-K 

Block copy (Bj) + K words from SCM to 

LCM 

30 bits 

012jK 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


n 

18 

I 30 

0115001000 



PL 

1000B+B5 

—1- 

1 

011 0002000 



RL 

20009 

1 

1 

0124777f77 



WL 

34-10 OB 

1 

1 


8.4.6 EXCHANGE JUMP INSTRUCTION (CYBER 170 SERIES, 

CYBER 70/MODELS 71, 72, 73, 74, AND 6000 SERIES) 

This instruction unconditionally exchange jumps the central processor, regardless of the state of the 
monitor flag bit. Instruction action differs, however, depending on whether the monitor flag bit is set or 
clear. 

| This instruction is not legal for a CYBER 170/Model 175, 740, 750, or 760 if the MEJ/CEJ switch is in the 
DISABLE position or if the instruction does not reside in parcel 0 of the instruction word. 

Operation is as follows: 

• Monitor flag bit clear: The starting address for the exchange is taken from the 18-bit Monitor Address 
register. This starting address is an absolute address. During the exchange, the monitor flag bit is set. 

• Monitor flag bit set: The starting address for the exchange is the 18-bit result formed by adding K to 
the contents of register Bj. This starting address is an absolute address. During the exchange, the 
monitor flag bit is cleared. 

For additional information, refer to the appropriate hardware reference manual. 
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The assembler forces upper before and after 1 assembling an XJ instruction. 

Formats: Functional Unit: Branch 


Operation 

Variable 

Description 

Size 

Octal Code 

XJ 


Exchange jump to MA if in program mode 

30 bits 

01300 00000 

XJ 

Bj 

Exchange jump to (Bj); flag set 

30 bits 

013j0 00000 

XJ 

K 

Exchange jump to K; flag set 

30 bits 

0130K 

XJ 

Bj+K 

Exchange jump to (Bj) ± K; flag set 

30 bits 

013jK 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

I 30 

0130000000 



XJ 


-1-- 

| 

0130001000 



XJ 

10 0 0B 

1 

0135000600 



XJ 

95+-60UB 

1 

1 


8.4.7 EXCHANGE EXIT INSTRUCTION (CYBER 70/MODEL 76 OR 7600) 

This instruction is used for calling a system monitor program for input/output, monitor calls, etc. and 
has priority over all other types of exchange jump requests. If an I/O interrupt request or an error exit 
request occurred prior to execution of this instruction, it is denied and the exchange jump specified by 
the MJ is executed. The rejected interrupt request is not lost, however. The conditions that caused it 
are reinstated when the exchange package enters its next execution interval. 

The normal termination for an exchange package execution interval is through execution of an exchange 
instruction (MJ). The MJ instruction voids the instruction word stack. Any instructions remaining in 
the stack are not executed. The exit mode flag in the PSD register determines the source of the ex¬ 
change package as follows: 

Exit mode flag set: When the exit mode flag is set, the MJ instruction causes the current program 
sequence to terminate with an exchange jump to a relative address in the SCM field for the current 
program. The exchange package is located at relative address (Bj) ± K. An overflow of the 
lowest order 16 bits of this result causes an error condition that is not sensed in the hardware. 
Should a program erroneously execute an exchange exit instruction with an overflow condition, the 
exchange jump sequence begins at the absolute SCM address corresponding to the lowest order 16 
bits of this sum. This 30-bit form of MJ is privileged to a monitor program. 

Exit mode flag not set: When the exit mode flag is not set, the object program terminates the exe¬ 
cution interval with a 15-bit form of the MJ instruction. The normal exit address (NEA) is the 
absolute address of the exchange package. This is an absolute address in SCM and is generally not 
in the SCM field for the current program. This form of the MJ instruction has a blank variable 
field; the assembler sets the j and k designators to zero. 

The system makes no protective tests on the exchange jump address. 
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All operating register values, program addresses, and mode selections are preserved in the exchange 
package for the object program so that the object program can be continued at a later time. The program 
address in the object program exchange package is advanced one count from the address of the instruc¬ 
tion word containing the exchange exit instruction. The monitor program normally resumes the object 
program at this address. 

The assignment of (NEA) is a responsibility of the system monitor program. If (NEA) has more than 16 
bits of significance, the upper bits are discarded and the lower 16 bits are used as the absolute address 
in SCM for the exchange jump. A force upper occurs after the instruction is assembled. 


Formats: Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

MJ 


Exchange exit to NEA if exit flag clear 

> 15 bits 

01300 

MJ 

Bj 

Exchange exit to (Bj) if exit flag set 

30 bits 

013j0 00000 

MJ 

Bj+K 

Exchange exit to (Bj) + K if exit flag set 

30 bits 

013jK 

MJ 

K 

Exchange exit to K if exit flag set 

30 bits 

0130K 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

017 0 0 



mj 


-1- 

I 

017<40G0 c 00 



MJ 

Rt» + f 007 

1 

1 

017^7774.77 



MJ 

-300B+B6 

| 

01700 0 Of0n 


f 

MJ 

fOOR 

1 


8.4.8 DIRECT LCM TRANSFER INSTRUCTIONS (CYBER 170/MODEL 176. 

CYBER 76/MODEL 76 OR 7600) 

A single word transfer either reads one 60-bit word from LCM and enters this word into an X register 
or writes one 60-bit word directly into LCM from an X register. 

The execution time for transferring a word from LCM to an X register depends on whether the 
requested word already resides in one of the bank operand registers. A read LCM instruction for a 
word not currently residing in a bank operand register will require 17 clock periods for delivering a 
field of eight 60-bit words to the designated X register. A read LCM instruction for a word already 
residing in a LCM bank operand register as a result of a previous instruction will require three clock 
periods to deliver the requested word to the designated X register. Thus, although the first 60-bit 
word will require 17 clock periods, the second through eighth words in the same LCM word require 

three clock periods each. This means that consecutive LCM operands are available, on an average, 
every five clock periods as opposed to SCM operands at eight clock periods. 

The LCM address is determined from the low order 19 bits of Xk. Even if (Xk) is negative, the 19 
bits are treated as a positive integer. If the address exceeds the field length (FLL), the word transfer 
does not take place and the LCM direct range condition flag is set in the PSD register. Xj is either 
the source or destination register. 
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Instructions are buffered to the extent that each issues in one minor cycle unless a previous LCM 
reference is in process. When an RX instruction issues, the LCM busy flag is set and remains set 
until the requested word is delivered. 

For a write (WX) instruction, if the word cannot be entered immediately in the proper bank operand 
register, it is held in the LCM write register until the bank operand register is free. 


Formats: 


Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

RXj 

Xk 

Read LCM at (Xk) and set Xj 

15 bits 


WXj 

Xk 

Write (Xj) into LCM at (Xk) 

15 bits 

gg | 


Examples: 


Code Generated 

01455 

015 ?* 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

IB 

1 30 







PX6 

X5 

| 

1 



WX7 

XQ 

1 

1 


8.4.9 RESET INPUT CHANNEL BUFFER INSTRUCTION (CYBER 170/MODEL 176, 

CYBER 70/MODEL 76 OR 7600) 

This instruction initiates a new record transmission from a PPU to SCM. This instruction prepares 
the input channel (Bk) buffer for a new record transmission from a PPU to SCM. The instruction 
clears the input channel buffer address and resets the input channel assembly counter to the first 
12-bit position in the SCM word. 


This instruction is intended to be privileged to an input routine, that is, one that terminates a record 
of incoming data and prepares for the next record. 

The input routine removes the data in the input channel buffer and then executes this instruction to 
prepare the buffer for the next incoming record. This instruction is effective only if the monitor mode 
flag is set in the program status register. If the monitor mode flag is cleared, this instruction 
becomes a pass instruction. When this instruction issues, it will execute the required channel functions 
without regard to the current status or activity at the input channel buffer. 

The lowest order four bits of (Bk) are used in this instruction. The higher order bits are ignored. If 
higher order bits are set in (Bk) the lowest order four bits are masked out and used to determine the 
channel number. If (Bk) is zero, this instruction becomes a pass instruction. 

Two or more consecutive RI instructions referring to different channels will issue in consecutive 
clock periods with no interference resulting in the multiplexer. If two consecutive instructions refer to 
the same channel, they repeatedly perform the same function but do not cause interference in the 
multiplexer. 
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Format: Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

RI 

Bk 

Reset input channel (Bk) buffer 

15 bits 

0160k 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


1! 

18 

1 30 





.. » _ 

01617 



RI 

[B7 

! 


8.4.10 SET REAL-TIME CLOCK INSTRUCTION (CYBER 170/MODEL 176, 

CYBER 70/ MODEL 76 OR 7600) 

This instruction reads the contents of the CPU clock period counter (real-time clock) and places them in 
Bi. The 18-bit clock counter advances one count in two's complement mode for each clock period. The 
2* 7 bit is the overflow bit. The CPU is interrupted when the overflow bit is set. When the interrupt 
is handled, the bit is cleared. It permits measurement of CPU execution. 


Format: Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

TBj 


Set Bj to current clock time 

15 bits 

016j0 

TBj 

K 

Set Bj to current clock time; K is ignored. 

15 bits 

016j0 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

01670 

1 


1! 

18 130 



TB7 

--- 1 --- 

/ 


8.4.11 RESET OUTPUT CHANNEL BUFFER INSTRUCTION (CYBER 170/MODEL 176, 

CYBER 70/MODEL 76 OR 7600) 

This instruction initiates a new record transmission from SCM to PPU. It clears the output channel 
(Bk) buffer address and disassembly counter, transmits a record pulse over the output channel data 
path to the PPU, and initiates an SCM reference for the first word to be transmitted. 

This instruction is intended for execution in an output routine to initiate a new record transmission 
over an output channel data path. The output channel buffer is normally inactive when this instruction 
is executed. The output channel buffer is loaded with the data for the next record, and this instruction 
is executed to initiate the transmission. The record pulse is transmitted along with the word pulse as 
soon as the first word of data from the SCM is entered in the output channel disassembly register. 
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This instruction is effective only if the monitor mode flag is set in the program status register. If the 
monitor mode flag is cleared, this instruction becomes a pass instruction. When this instruction issues 
it will execute the required channel functions without regard to the current status or activity at the 
output channel. 

The lowest order four bits of (Bk) are used in this instruction. The higher order bits are ignored. If 
higher order bits are set in (Bk), the lowest order four bits are masked out and used to determine the 
channel number. If (Bk) is zero, this instruction becomes a pass instruction. 

Normally, the output channel buffer is inactive when this instruction is executed, the program having 
checked for completion of the previous record before issuing an RO. The program can detect the end 
of record in two ways. First, it can compare the output channel buffer address with a known record 
length. The alternative is to obtain a response from the peripheral unit over the corresponding input 
channel data path. If data is moving over the output channel data path when an RO is issued, the RO 
instruction takes priority, with a resulting loss of data in the previous record. Two or more 
consecutive RO instructions referring to different channels will issue in consecutive clock periods with 
no interference resulting in the multiplexer. If two consecutive instructions refer to the same channel, 
they transmit a record pulse over the output path and restart the buffer repeatedly. A data word may 
or may not be transmitted depending on the timing of the instructions and conflicts that occur. 


Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

RO 

Bk 

Reset output channel (He) buffer 

15 bits 

0170k 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

01705 



RO 

B5 


8.4.12 READ CHANNEL STATUS INSTRUCTIONS (CYBER 170/MODEL 176 
CYBER 70/MODEL 76 OR 7600) 

These instructions copy the contents of the input or output channel buffer address register indicated 
by masking the low order 4 bits of Bk and enter the value in Bj. The instructions are used for 
monitoring the progress of an input channel buffer or an output channel buffer. 

A channel buffer area is divided into fields by the threshold testing mechanism. The first half of the 
buffer area constitutes one field and the last half of the buffer area the other field. An I/O multiplexer 
interrupt request is generated by the threshold testing mechanism whenever the channel buffer address 
is advanced across a field boundary. This occurs at the center of the buffer area and at the end of the 
buffer area. 

The IBj instruction is the only vehicle for a program to determine whether an I/O multiplexer interrupt 
request was generated by a buffer threshold test or by a record flag. The program must retain the 
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input channel buffer address from one interrupt period to the next. If the buffer address is in the same 
field as for the previous interrupt, the interrupt request was from a record flag. If the buffer address 
is in the opposite field from the previous interrupt, the interrupt request was from a threshold test. 

The lowest order four bits of (Bk) are used in these instructions. The higher order bits are ignored. 

If higher order bits are set in (Bk) the lowest order four bits are masked out and used to determine the 
channel number. If (Bk) = 0, the IBj instruction reads the contents of the CPU clock period counter. 
However, the OBj instruction places all zeros into Bj. 

Two or more IBj instructions or OBj instructions may occur in consecutive program instruction locations 
referencing the same or different channels. These instructions may issue in consecutive clock periods 
providing the Bj register reservations do not cause a delay. No interference will result in the multi¬ 
plexer in these situations. 

If correct results are to be obtained, an IBj instruction must not immediately follow an RI instruction 
nor may an OBj instruction immediately follow an RO instruction. A delay of one clock period is 
sufficient. 


Formats: Functional Unit: None 


Operation 

Variable 

Description 

Size 

Octal Code 

IBj 

Bk 

Bj —Read input channel (Bk) status 

15 bits 

016jk 

OBj 

Bk 

Bj —Read output channel (He) status 

15 bits 

017jk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

0166** 



T r *6 

nu 

-J--- 

1 

l 

01766 



H95 

"6 

1 

1 


8.4.13 UNCONDITIONAL JUMP INSTRUCTION 

This instruction adds the contents of index register Bi to K and branches to the relative CM (SCM) 
address specified by the sum. The remaining instructions, if any, in the current instruction word are 
not executed. The branch address is K when i is zero. 

Addition is performed in an 18-bit one's complement mode. On a CYBER 170 Series, (except Model 
176), a CYBER 70/ Model 71, 72, 73, or 74 or 6000 Series system this instruction voids the stack. 

On a CYBER 70/Model 76 and 7600 or CYBER 170/Model 176, the instruction word stack is not altered 
by execution of this instruction. The instruction is intended to allow computed branch point destinations. 
It is the only CPU instruction in which a computed parameter can specify a program branch destination 
address. All other jump instructions have preassigned destination addresses at execution time. 

The assembler sets the unused j designator to the same value as the i designator. A force upper occurs 
after the instruction is assembled. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Branch 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: None | 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

JP 

Bi±K 

Jump to (Bi)±K 

30 bits 

02iiK 

JP 

Bi 

Jump to (Bi) 

30 bits 

02ii0 00000 

JP 

K 

Jump to K 

30 bits 

0200K 


Example: 


Code Generate ’ 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


II 

IB 

1 30 

025S000004 ♦ 



jp 

85*G0T0 

-1-- 

1 

0277000000 



jp 

67 

i 

i 


8.4.14 X-REGISTER CONDITIONAL BRANCH INSTRUCTIONS 

These instructions cause the program sequence to branch to K or to continue with the current program 
sequence depending on the contents of operand register Xj. The decision is not made until the Xj register 
is free. These instructions do not void the stack. 

The following rules apply to tests made in this instruction group: 

• The ZR and NZ operations test the full 60-bit word in Xj. The words 00.00 and 77.77g are | 

treated as zero. All other words are non-zero. Thus, these instructions are not a valid test for 
floating point zero coefficients. However, they can be used for underflow of floating point quantities. 

• The PL and NG operations examine only the sign bit (bit 59) of Xj. If the sign bit is zero, the word is 
positive; if the sign bit is one, the word is negative. Thus, the sign test is valid for fixed point words 
or for coefficients in floating point words. 

• The IR and OR operations examine the upper-order 12 bits of Xj. 

On the CYBER 170/Model 176, CYBER 70/Model 76 or 7600, the following octal quantities are | 

detected as being out of range: 

3777x.x (positive overflow) 

4000x.x (negative overflow) 

1777x.x (positive indefinite) 

6000x.x (negative indefinite) 

All other words are in range. An underflow quantity is considered in range. The value of the 
coefficient is ignored in making this test. 

On a CYBER 70/Model 71, 72, 73, or 74, CYBER 170 Series (except Model 176) or 6000 Series 
computer system, the octal quantities 3777x.. .x and 4000x.. .x are out of range; all other words are f 
in range. 
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• The DF and ID operations examine the upper-order 12 bits of Xj. Both positive and negative indefinite 
forms are detected: 

1777x.x and 6000x.x are indefinite. 

All other words are definite. The value of the coefficient is ignored in making this test. 

• An error exit occurs on a 6000 Series, a CYBER 170 Series or a CYBER 70/Model 71, 72, 73 or 74 
system when an indefinite or out of range value is used as an operand of an arithmetic instruction. 
Such error exits can be avoided by using DF, ID, IR, or OR instructions to test for such values before 
using them as operands. 

On a 7600 or CYBER 70/Model 76 system, an error exit occurs as soon as indefinite or out of range 
value is produced as the result of an arithmetic instruction. The DF, ID, IR and OR instructions are 
useful only when a MODE control statement is used to suppress such error exits. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Branch 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: None 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

ZR 

Xj.K 

Branch to K if (Xj) = 0 

30 bits 

030jK 

NZ 

Xj.K 

Branch to K if (Xj) / 0 

30 bits 

031 jK 

PL 

Xj,K 

Branch to K if (Xj) sign is plus 

30 bits 

032jK 

NG 

Xj,K 

Branch to K if (Xj) sign is minus 

30 bits 

033jK 

MI 

Xj, K 

Branch to K if (Xj) sign is minus 

30 bits 

033jK 

IR 

Xj.K 

Branch to K if (Xj) in range 

30 bits 

034jK 

OR 

Xj.K 

Branch to K if (Xj) out of range 

30 bits 

035jK 

DF 

Xj.K 

Branch to K if (Xj) definite 

30 bits 

036jK 

ID 

Xj.K 

Branch to K if (Xj) indefinite 

30 bits 

037jK 
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Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 


1 


11 

u ho 

0305002363 ♦ 



ZR 

X5,ZER0 | 

0313002364 ♦ 



NZ 

X3,NONZERO ! 

0324002365 ♦ 



PL 

1 

X4fPLUS ' 

0331002366 * 



NG 

X 1 »NEG j 

0331002366 ♦ 



HI 

XltNEG I 

0340002367 ♦ 



IR 

X 0 fINRANGE ! 

1 

0351002370 * 



OR 

XlyOUTRNGE 1 

0365002371 «• 



OF 

X5.0EFINI 

0377002372 + 



IU 

X7.INUEFNT ! 


8.4.15 B-REGISTER CONDITIONAL BRANCH INSTRUCTIONS 

The following rules apply in the tests made by these instructions: 

• Positive zero is recognized as unequal to negative zero. 

• Positive zero is recognized as greater than negative zero. 

• A positive number is recognized as greater than a negative number. 

The 06 and 07 instructions are intended for branching on an index threshold test. The tests are made in a 
19-bit one's complement mode. The (Bi) and the (Bj) are sign extended one bit to prevent erroneous results 
caused by exceeding the modulus of the comparison device. The (Bj) is then subtracted from the (Bi). The 
branch decision is based on the sign bit in the 19-bit result. 

For these instructions, Bi and Bj must be specified in the order indicated below. 

These instructions do not void the instruction stack. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Branch 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: None 


I 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

ZR 

K 

Branch to K 

30 bits 

0400K 

ZR 

Bi,K 

Branch to K if (Bi) = 0 

30 bits 

04i0K 

EQ 

K 

• 

Branch to K 

30 bits 

0400K 

EQ 

Bi,K 

Branch to K if (Bi) = 0 

30 bits 

04i0K 

EQ 

Bi.Bj.K 

Branch to K if (Bi) = (Bj) 

30 bits 

04ijK 

NE 

Bi, K 

Branch to K if (Bi) 4 0 

30 bits 

05i0K 

NE 

Bi,Bj,K 

Branch to K if (Bi) 1 (Bj) 

30 bits 

05ijK 

NZ 

Bi,K 

Branch to K if (Bi) ^ 0 

30 bits 

05i0K 

PL 

Bi,K 

Branch to K if (Bi) > 0 

30 bits 

06i0K 

GE 

Bi, K 

Branch to K if (Bi) > 0 

30 bits 

06i0K 

GE 

Bi, Bj, K 

Branch to K if (Bi) > (Bj) 

30 bits 

06ijK 

LE 

Bj,Bi,K 

Branch to K if (Bj) < (Bi) 

30 bits 

06ijK 

LE 

Bj, K 

Branch to K if (Bj) < 0 

30 bits 

060jK 

NG 

Bi,K 

Branch to K if (Bi) < 0 

30 bits 

07i0K 

MI 

Bi,K 

Branch to K if (Bi) < 0 

30 bits 

07i0K 

GT 

Bj,Bi,K 

Branch to K if (Bj) > (Bi) 

30 bits 

07ijK 

GT 

Bj, K 

Branch to K if (Bj) >0 

30 bits 

070jK 

■ 

LT 

Bi, K 

Branch to K if (Bi) < 0 

30 bits 

07i0K 

LT 

Bi.Bj.K 

Branch to K if (Bi) < (Bj) 

30 bits 

07ijK 
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Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 


! 


11 

IB 1 30 

0450005221 «- 



2R 

85»87ER0 1 

040500522? ♦ 



EQ 

1 

B0,85,EQUAL | 

0453005223 



EQ 

B5,83,JUMP | 

0400005223 ♦ 



EQ 

JUMP ; 

0515005224 «• 



NE 

B1,«5,N0TE;q 1 

1 

0560005225 *■ 



NZ 

86 ,BNOTZR 1 

0620005226 + 



PL 

1 

B? 9 BPLUS 1 

0645005227 ♦ 



GE 

84,85,GEQ ; 

0650005230 + 



GE 

B5 f GEBQ 1 

1 

0676005231 ♦ 



LE 

86 ,87,LTHfiN | 

0770005232 + 



NG 

87,0NEG 

0730005233 + 



HI 

B3,93LT0 

0767005234 ♦ 



GT 

B7,B 6 ,B7GT j 

0705005235 «• 



GT 

85 9 B5GT0 1 

l 

0712005236 + 



LT 

Bl, 82,BLTB 1 


8.4.16 TRANSMIT INSTRUCTION 

This instruction transfers the 60-bit word in operand register Xj to register Xi. It is essentially a copy 
instruction intended for moving data from X register to X register as quickly as possible. No logical 
function occurs. The assembler sets the k designator to the value specified for j. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

BXi 

Xj 

Transmit (Xj) to Xi 

15 bits 

10ijj 


Example: 


Code Generated 

106?? 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 1 30 



8X6 

X2 


60492600 G 


8-25 















8.4.17 LOGICAL PRODUCT INSTRUCTION 


This instruction forms the logical product (AND function) of 60-bit words from operand registers Xj and Xk 
and places the product in operand register Xi. Bits of register Xi are set to 1 when the corresponding bits 
of the Xj and Xk registers are 1 as in the following example: 

(Xj) =0101 
(Xk) = 1100 

(xi) =imnj 

This instruction is intended for extracting portions of a 60-bit word during data processing. If the j and k 
designators have the same value, the instruction becomes a transmit instruction. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 
CYBER 170/Model 175, 176, 740, 750 or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

BXi 

Xj*Xk 

Logical product of (Xj) and (Xk) to Xi 

15 bits 

llijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


l 


11 

18 

130 

11563 



BX5 

|X5*X3 ! 


8.4.18 LOGICAL SUM INSTRUCTION 

This instruction forms the logical sum (inclusive OR) of 60-bit words from operand registers Xj and Xk and 
places the sum in operand register Xi. A bit of register Xi is set to 1 if the corresponding bit of the Xj or 
Xk register is a 1, as in the following example: 

(Xj) = 0101 
(Xk) = 1100 
(Xi) =TI<JI 

This instruction is intended for merging portions of a 60-bit word into a composite word during data 
processing. If the j and k designators have the same value, the instruction degenerates into a transmit 
instruction. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

BXi 

Xj+Xk 

Logical sum of (Xj) and (Xk) to Xi 

15 bits 

12ijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 






12767 



BX7 

X6+X7 i 
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8.4.19 LOGICAL DIFFERENCE INSTRUCTION 

This instruction forms the logical difference (exclusive OR) of 60-bit words from operand registers Xj and 
Xk and places the difference in operand register Xi. A bit in register Xi is set to 1 if the corresponding 
bits in the Xj and Xk registers are unlike, as in the following example: 

(Xj) = 0101 
(Xk) = 1100 
(Xi) = 1001 

This instruction is intended for comparing bit patterns or for complementing bit patterns during data 
processing. If the j and k designators have the same value, the result will be a word of all zeros written 
into register Xi. 


CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean | 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

BXi 

Xj-Xk 

Logical difference of (Xj) and (Xk) to Xi 

15 bits 

13ijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

13601 



BX6 

X0-X1 i 


8.4.20 COMPLEMENT INSTRUCTION 

This instruction extracts the 60-bit word from operand register Xk, complements it, and transmits this 
complemented quantity to operand register Xi. It is intended for changing the sign of a fixed point or 
floating point quantity as quickly as possible. 

The assembler sets the unused j designator of the instruction to k. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean | 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

BXi 

-Xk 

Transmit complement of (Xk) to Xi 

15 bits 

14ikk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

| 30 

14311 



BX3 

-XI 

- 1 ...— 

t 


60492600 G 
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8.4.21 LOGICAL PRODUCT AND COMPLEMENT INSTRUCTION 


This instruction forms the logical product (AND function) of the 60-bit quantity from operand register Xj 
and the complement of the 60-bit quantity from operand register Xk, and places the result in operand 
register Xi. Thus, bits of Xi are set to 1 when the corresponding bits of the Xj register and the 
complement of the Xk register are 1, as in the following example: 

(Xj) =0101 
Complemented (Xk) = 0011 
(Xi) =WM 

This instruction is intended for extracting portions of a 60-bit word during data processing. If the j and k 
designators have the same value, a logical product is formed between two complementary quantities. The 
result will be a word of all zeros. 


CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

BXi 

-Xk*Xj 

Logical product of (Xj) and complement 
of (Xk) to Xi 

15 bits 



Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


n 

18 

1 30 





.. - _ 

15432 



BX4 

-X2*X3 i 


8.4.22 COMPLEMENT AND LOGICAL SUM INSTRUCTION 

This instruction forms the logical sum (inclusive OR) of the 60-bit quantity from operand register Xj and 
the complement of the 60-bit word from operand register Xk, and places the result in operand register Xi. 
Thus, bits of Xi are set to 1 if the corresponding bit of the Xj register is one or the corresponding bit of the 
Xk register is a 0, as in the following example: 

(Xj) = 0101 
(Xk) = 1100 
(Xi) = TJTTT 

This instruction is intended for merging portions of a 60-bit word into a composite word during data 
processing. If the j and k designators have the same value, the result is a word of all ones. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean 


Format: 


Operation 

Variable 

Description 

Size 1 Octal Code 

BXi 

-Xk-Xj 

Logical sum of (Xj) and complement of 
(Xk) to Xi 

15 bits 1 16ijk 
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Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

ho 

16654 



BX6 

I-X4+X5 I 


8.4.23 COMPLEMENT AND LOGICAL DIFFERENCE INSTRUCTION 

This instruction forms the logical difference (exclusive OR) of the quantity from operand register Xj and 
the complement of the 60-bit word from operand register Xk, and places the result in operand register Xi. 
Thus, bits of Xi are set to 1 if the corresponding bits of Xj and register Xk are alike, as in the following 
example: " 

(Xj) = 0101 
(Xk) = 1100 
(Xi) =UITff 

This instruction is intended for comparing bit patterns or for complementing bit patterns during data 
processing. If the j and k designators have the same value, a logical difference is formed between two 
complementary quantities. The result is a word of all ones. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Boolean 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

BXi 

-Xk-Xj 

Logical difference of (Xj) and complement 
of (Xk) to Xi 

15 bits 

17ijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 





— 

17731 



BX7 

-X1-X3 1 


8.4.24 LOGICAL LEFT SHIFT jk PLACES INSTRUCTION 

This instruction shifts the 60-bit word in operand register Xi left circular jk places if expression jk is 
positive or left circular 60+jk places if jk is negative. Bits shifted off the left end of operand register Xi 
replace those shifted from the right end. 

The 6-bit shift count jk allows a complete circular shift of (Xi). 

In COMPASS notation, jk is an absolute expression. If it is positive, COMPASS Places the lower 6 bits of 
the value in the jk fields. If it is negative, COMPASS adds 60 to jk and places the result in the jk fields. 
Thus, a negative value effectively designates a logical right shift. A positive value designates a left shift. 

If the negative shift count is less than -60, the assembler generates a type 7 error. 


60492600 G 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Shift 


I 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

LXi 

jk 

Logical shift (Xi) by + jk places 

15 bits 

20ijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 Uo 

20325 

20362 



LX3 

LX3 

25B 

1 

-12B 1 

l 


8.4.25 ARITHMETIC RIGHT SHIFT jk PLACES INSTRUCTION 

This instruction shifts the 60-bit word in operand register Xi right jk places if expression jk is positive and 
right 60+jk places if expression jk is negative. The rightmost bits of Xi are discarded and the sign bit is 
extended. 

If the shift count is equal to the 60-bit register length, the result contains 60 copies of the sign bit. If the 
operand is positive, a positive zero results. If the operand is negative, a negative zero results. 

In COMPASS notation, jk is an absolute expression. If it is positive, COMPASS places the lower 6 bits of 
the value in the jk fields. If it is negative, COMPASS adds 60 to jk and places the result in the jk fields. 
Thus, a negative value effectively designates the number of high order bits of the operand that are to be 
| retained. If the negative shift count is less than -60, a type 7 error is generated. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 

I CYBER 170/Model 175, 176, 740, 750, or 760 and the 

CYBER 70/Model 76 or 7600 Functional Unit: Shift 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

AXi 

jk 

Arithmetic shift (Xi) by + jk places 

15 bits 

21ijk 


Example: 


Code Generated 


LOCATION 

! OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

Uo 

21537 



AX5 

|37B ! 
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8.4.26 LOGICAL LEFT SHIFT (Bj) PLACES INSTRUCTION 

This instruction shifts the 60-bit quantity from operand register Xk the number of places specified by the 
quantity in index register Bj and places the result in operand register Xi. The direction of the shift 
operation is determined by the sign of Bj, as follows: 

• If (Bj) is positive (that is, bit 17 of Bj=0), the quantity from Xk is shifted left circular. The low order 6 
bits of (Bj) specify the shift count. The higher order bits are ignored. 

• If (Bj) is negative (that is, bit 17 of Bj=l), the quantity from Xk is shifted right (end off with sign 
extension). For the CYBER 170 Series (except Model 176), the CYBER 70 Series/Models 71, 72, 73, 
and 74, and the 6000 Series, the one's complement of the low order 11 bits of (Bj) specify the shift 
count. The higher order bits are ignored. If the shift count is 59 to 63 (decimal), the result stored in 
the Xi register consists of 60 copies of the operand sign bit. If the shift count is 64 (decimal) or 
greater, the result register Xi is cleared to 60 zeros. For the CYBER 170/Model 176, CYBER 70/ 
Model 76 and the 7600, the one's complement of the low order 12 bits of (Bj) specify the shift count. 
The higher order bits are ignored. If the shift count is 59 (decimal) or greater, the result stored in the 
Xi register consists of 60 copies of the operand sign bit. 

If -Bj is specified, the assembler converts the instruction to an arithmetic right shift. The (Bj) might be 
the result of an unpack instruction, in which case it is the unbiased exponent and (Xi) is the coefficient. 
This instruction is used for shifting a coefficient from a floating point number to the integer position after 
an unpack operation. 


CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Shift 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

LXi 

Xk, Bj 

Logically shift (Xk) by (Bj) places to Xi 

15 bits 

22ijk 

LXi 

B j, Xk 

Logically shift (Xk) by (Bj) places to Xi 

15 bits 

22ijk 

LXi 

Xk 

Transmit (Xk) to Xi 

15 bits 

22i0k 

LXi 

Bj 

Logically shift (Xi) by (Bj) places to Xi 

15 bits 

22iji 

LXi 

-Bj, Xk 

Arithmetic right shift (Xk) by (Bj) 
places to Xi 

15 bits 

23ijk 

LXi 

Xk,-Bj 

Arithmetic right shift (Xk) by (Bj) 
places to Xi 

15 bits 

23ijk 

LXi 

-Bj 

Arithmetic right shift (Xi) by (Bj) 
places to Xi 

15 bits 

23iji 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


n 

18 

1 30 

22675 



LX6 

X5,B7 

-1- 

1 

22534 



LX5 

83,X4 

1 

1 

22302 


i 

LX3 

X2 

1 

1 


60492600 G 
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8.4.27 ARITHMETIC RIGHT SHIFT (Bj) PLACES INSTRUCTION 


This instruction shifts the 60-bit quantity from operand register Xk the number of places specified by the 

I quantity in index register Bj and places the result in operand register Xi. The direction of the shift 
operation is determined by the sign of Bj, as follows: 

• If (Bj) is positive (that is, bit 17 of Bj=0), the quantity from register Xk is shifted right (end off with 
sign extension). For the CYBER 170 Series, (except Model 176) CYBER 70/Model 71, 72, 73, 74 and 
6000 Series Computer Systems, the low order 11 bits of (Bj) specify the shift count. The higher order 
bits are ignored. If the shift count is 59 to 63 (decimal), the Xi register contains 60 copies of the (Xk) 
sign bit. If the shift count is 64 (decimal) or more, the Xi register is zeroed. For the CYBER 170/ 
Model 176, CYBER 70/Model 76 or 7600 Computer Systems, the low order 12 bits of (Bj) specify the 
shift count. The higher order bits are ignored. If the shift count is 59 (decimal) or more, the Xi 
register contains 60 copies of the sign of the operand. 

• If (Bj) is negative (that is, bit 17 of Bj=l), the quantity from register Xk is shifted left circular. The 
complement of the lower order 6 bits of Bj specify the shift count. The higher order bits are ignored. 

If -B is specified, the assembler converts the instruction to a logical left shift. This instruction is intended 
for use in data processing where the amount of shift is derived in the computation. This instruction is also 
useful for adjusting the coefficient of a floating point number while it is in its unpacked form. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 

I CYBER 170/Model 175, 176, 740, 750, or 760 and the 

CYBER 70/Model 76 or 7600 Functional Unit: Shift 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

AXi 

Xk, Bj 

Arithmetic shift of (Xk) by (Bj) places to Xi 

15 bits 


AXL 

Bj, Xk 

Arithmetic shift of (Xk) by (Bj) places to Xi 

15 bits 


AXi 

Xk 

Transmit (Xk) to Xi 

15 bits 

23i0k 

AXi 

Bj 

Arithmetic shift of (Xi) by (Bj) places to Xi 

15 bits 

23iji 

AXi 

-Bj, Xk 

Logically shift (Xk) by (Bj) places to Xi 

15 bits 

22ijk 

AXi 

Xk, -Bj 

Logically shift (Xk) by (Bj) places to Xi 

15 bits 

22 ijk 

AXi 

-Bj 

Logically shift (Xi) by (Bj) places to Xi 

15 bits 

22iji 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

(30 

23764 



AX7 

X4,B6 


23211 



AX2 

B1,X1 

I 

23502 



AX5 

X2 


23424 



AX4 

B2 

1 
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8.4.28 NORMALIZE INSTRUCTION 


This instruction normalizes the floating point quantity from operand register Xk and places it in operand 
register Xi. Normalizing consists of shifting the coefficient the minimum number of positions required to 
make bit 47 different from bit 59. This places the most significant bit of the coefficient in the highest 
order position of the coefficient portion of the word. The exponent portion of the word is then decreased 
by the number of bit positions shifted. The number of shifts required to normalize the quantity is entered 
in index register Bj. 


CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 
CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Shift | 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

NXi 

Xk 

Normalize (Xk) to Xi 

15 bits 

24i0k 

NXi 

Bj, Xk 

Normalize (Xk) to Xi; shift count to Bj 

15 bits 

24ijk 

NXi 

Xk, Bj 

Normalize (Xk) to Xi; shift count to Bj 

15 bits 

24ijk 

NXi 


Normalize (Xi) to Xi 

15 bits 

24i0i 

NXi 

Bj 

Normalize (Xi) to Xi; shift count to Bj 

15 bits 

24iji 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

bo 






24575 



NX5 

X5,87 

l 

1 

24505 



NX5 


1 

| 

24552 



NX5,95 

X 2 

1 


8.4.29 ROUND AND NORMALIZE INSTRUCTION 

This instruction performs the same operation as the NXi instruction with the exception that the quantity 
from operand register Xk is rounded before it is normalized. Rounding is accomplished by placing a 1 round 
bit immediately to the right of the least significant coefficient bit. The resulting coefficient is increased 
by one-half the value of the least significant bit. Normalizing a zero coefficient places the round bit in bit 
47 and reduces the exponent by 48. Note that the same rules apply for underflow, overflow, infinite, and 
indefinite results. 

If (Xk) is an infinite quantity (3777x.. .xg or 4000x.. .xg) or an indefinite quantity (1777x.. .xg or 
6000x.. .xg), no shift takes place. The contents of Xk are copied into Xi, and Bj is set to zero. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Shift 


I 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

ZXi 

Xk 

Round and normalize (Xk) to Xi 

15 bits 

25i0k 

ZXi 

Bj,Xk 

Round and normalize (Xk) to Xi; shift 





count to Bj 

15 bits 

25ijk 

ZXi 

Xk, Bj 

Round and normalize (Xk) to Xi; shift 





count to Bj 

15 bits 

25ijk 

ZXi 

Bj 

Round and normalize (Xi) to Xi; shift 





count to Bj 

15 bits 

25iji 

ZXi 


Round and normalize (Xi) to Xi 

15 bits 

25i0i 


Example: 

Code Generated 

25474 

25404 

25361 



LOCATION 

OPERATION ; 

VARIABLE 

COMMENTS 

1 


11 

18 

|30 







ZX4 

X4,B7 

1 

1 



ZV4 


1 

1 



ZX3,B6 

XI 

1 

1 


8.4.30 UNPACK INSTRUCTION 

This instruction unpacks the floating point quantity from operand register Xk and sends the 48-bit 
coefficient to operand register Xi and the 11-bit exponent to index register Bj. The exponent packing is 
removed during unpack so that the quantity in Bj is the true one's complement representation of the 
exponent. The contents of Xk need not be normalized. 

The exponent and coefficient are sent to the low-order bits of the respective registers, as shown below: 


Sign Packed Exponent Coefficient 



17 10 9 00 59 48 47 


Special operand formats are treated in the same manner as normal operands. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 
CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean | 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

UXi 

Xk 

Unpack (Xk) to Xi 

15 bits 

26i0k 


UXi 

Bj, Xk 

Unpack (Xk) to Xi and Bj 

15 bits 

26ijk 


UXi 

Xk, Bj 

Unpack (Xk) to Xi and Bj 

15 bits 

26ijk 


UXi 


Unpack (Xi) to Xi 

15 bits 

26i0i 


UXi 

Bj 

Unpack (Xi) to Xi and Bj 

15 bits 

26iji 



Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

16 

ho 

26777 



UX7 

X7,37 

-1-- 

1 

26342 



UX3,X2 

84 

1 

2670/ 



UX7 

1 


1 

I 

26777 



UX7 

1 

37 

1 

i 


8.4.31 PACK INSTRUCTION 

This instruction packs a floating point number in operand register xi. The coefficient of the number is 
obtained from operand register Xk and the exponent is obtained from index register Bj. The exponent is 
packed by reversing the setting of bit 10 of the exponent during the pack operation. The pack instruction 
does not normalize the coefficient. 

Exponent and coefficient are obtained from the proper low-order bits of the respective registers and 
packed in reverse order as shown in the illustration for the unpack instruction. Thus, bits 58 through 48 of 
Xk and bits 17 through 11 of Bj are ignored. There is no test for overflow or underflow. No flags are set in 
the PSD register by this instruction. 

Note that if (Xk) is positive, the packed exponent occupying bits 58 through 48 of Xi is obtained from bits 
10 through 00 of Bj by complementing bit 10; if (Xk) is negative, bit 10 is not complemented but bits 09 
through 00 are complemented. 

The j designator can be set to zero in this instruction to pack a fixed point integer into floating point 
format without using one of the active B registers (exponents). 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Boolean 


I 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

PXi 

Xk 

Pack (Xk) to Xi 

15 bits 


PXi 

Xk, Bj 

Pack (Xk) and (Bj) to Xi 

15 bits 


PXi 

Bj, Xk 

Pack (Xk) and (Bj) to Xi 

15 bits 

27ijk 

PXi 


Pack (Xi) to Xi 

15 bits 

27i0i 

PXi 

Bj 

Pack (Xi) and (Bj) to Xi 

15 bits 

27iji 


Example: 


Code Generated 


27565 

27671 

27505 

27565 



LOCATION 

— 

OPERATION 

VARIABLE 

COMMENTS 

1 

. 

11 

18 

|30 







PX5 

X5,B6 

1 



PX6,B7 

XI 

! 

i 



PX5 

. 


j 



0X5 

86 

i 

» 


8.4.32 UNROUNDED SP FLOATING POINT ADD INSTRUCTIONS 

These instructions form the unrounded sum or difference of the floating point quantities from operand 
registers Xj and Xk and pack the result in operand register Xi. The packed result is the upper half of a 
double precision sum or difference. 


At the start both arguments are unpacked, and the coefficient of the argument with the smaller exponent 
is entered into the upper half of the accumulator. The coefficient is shifted right by the difference of the 
exponents. The other coefficient is then added to or subtracted from the upper half of the accumulator. If 
overflow occurs, the result is right-shifted one place and the exponent of the result increased by one. The 
upper half of the accumulator holds the coefficient of the result, which is not necessarily in normalized 
form. The exponent and upper coefficient are then repacked in operand register Xi. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Add 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Add 


Format: 


---:- 

Operation 

Variable 

Description 

Size 

Octal Code 

FXi 

Xj+Xk 

Floating point sum of (Xj) and (Xk) to Xi 

15 bits 

30ijk 

FXi 

Xj-Xk . 

Floating point difference of (Xj) minus 
(Xk) to Xi 

15 bits 

31ijk 


8-36 


60492600 G 
















Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


n 

18 

Uo 

30345 



FX3 

X4+X5 

-1- 

i 

31213 



FX2 

X1-X3 

1 

t 


8.4.33 DP FLOATING POINT ADD INSTRUCTIONS 

These instructions form the sum or difference of two floating point numbers as in the single precision 
instructions, but pack the lower half of the double precision result with an exponent 48 less than the upper 
sum. The result is not necessarily normalized. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Add 

CYBER 170/Model 175, 176, 740, 750, or 760 and the 1 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Add | 


Format: 


Operation 

Variable 

Description 


Octal Code 

DXi 

Xj+Xk 

Floating DP sum of (Xj) and (Xk) to Xi 

15 bits 

32ijk 

DXi 

Xj-Xk 

Floating DP difference of (Xj) and (Xk) 
to Xi 

15 bits 

33ijk 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

32323 

33414 

1 


11 

18 130 


I 

0 x 3 

DX4 

X2+X3 ! 

1 

XI -\U I 


8.4.34 ROUNDED SP FLOATING POINT ADD INSTRUCTIONS 

These instructions form the rounded sum or difference of the floating point quantities from operand 
registers Xj and Xk and pack the upper portion of the double precision result in operand register Xi. These 
instructions are intended for use in floating point calculations involving single precision accuracy. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Add 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Add 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

RXi 

Xj+Xk 

Rounded floating sum of (Xj) and (Xk) 
to Xi 

15 bits 

34ijk 

RXi 

Xj-Xk 

Rounded floating difference of (Xj) minus 
(Xk) to Xi 

15 bits 

35ijk 


Examples: 



8.4.35 LONG ADD (FIXED POINT) INSTRUCTIONS 

These instructions form the 60-bit one's complement integer sum or integer difference of quantities from 
operand registers Xj and Xk and store the result in operand register Xi. An overflow condition is ignored. 

The instructions are intended for addition or subtraction of integers too large for handling in the increment 
unit. They are also useful for merging and comparing data fields during data processing. 

For an addition, if both operands are zero, the result is zero. If either zero operand is positive zero (all 
0's), the result is a positive zero quantity. If both operands are minus zero (all l's), the result is a negative 
zero quantity. 


CYBER 70/Model 74 or 6600/6700 Functional Unit: Long Add 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Long Add 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

IXi 

Xj+Xk 

Integer sum of (Xj) and (Xk) to Xi 

15 bits 

36ijk 

IXi 

Xj-Xk 

Integer difference of (Xj) minus (Xk) 
to Xi 

15 bits 

37ijk 


Example: 


Code Generated 

36545 

37631 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


n 

18 

1 30 







1X5 

X4 + X5 

| 

1 



1X6 

X3-X1 

1 

1 
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8.4.36 UNROUNDED SP FLOATING POINT MULTIPLY INSTRUCTION 

This instruction multiplies two floating point quantities obtained from operand registers Xj (multiplier) and 
Xk (multiplicand) and packs the upper product result in operand register Xi. 

In this operation, the exponents of the two operands are unpacked from the floating point format and are 
added with a correction factor of 48 to form the exponent for the result. The coefficients are multiplied 
as signed integers to form a 96-bit integer product. The upper half of this product is then extracted to 
form the coefficient of the result. The result is a normalized quantity only when both operands are 
normalized; the exponent in this case is the sum of the exponents plus 47 (or 48). The result is not 
normalized when either or both operands are not normalized. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Multiply 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Multiply | 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

FXi 

Xj *Xk 

Floating point product of (Xj) and 
(Xk) to Xi 

15 bits 

40ijk 


Example: 


Code Generated 


LOCATION 

... i 

OPERATION 

VARIABLE 

COMMENTS 


1 


U 

18 

1 30 





-- I _ ... 

40011 



FXO 

X1*X1 | 

1 


8.4.37 ROUNDED SP FLOATING POINT MULTIPLY INSTRUCTION 

This instruction multiplies the floating point number from operand register Xk (multiplicand), by the 
floating point number from operand register Xj. The upper product result is packed in operand 
register Xi. (No lower product is available.) The multiply operation is identical to that of the single 
precision instruction except that a rounding bit is added in bit position 46 of the 96-bit product. The upper 
half of the product is then extracted to form the coefficient for the result. An alternate output path is 
provided with a left shift of one bit position to normalize the result coefficient if the original operands 
were normalized and the double precision product has only 95 bits of significance. The exponent for the 
result is decremented by one count in this case. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Multiply 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Multiply | 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

RXi 

Xj*Xk 

Rounded floating point product of (Xj) 
and (Xk) to Xi 

15 bits 

41ijk 
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Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

| 30 





—— j- 

41232 



RX2 

X3*X2 ! 

1 


8.4.38 DP FLOATING POINT MULTIPLY INSTRUCTION 

This instruction multiplies two floating point quantities obtained from operand registers Xj and Xk and 
packs the lower product in operand register Xi. The two 48-bit coefficients are multiplied together to 
| form a 96-bit product. The lower order 48 bits of the product (bits 47 through 0) are then packed together 
with the resulting exponent. The result is not necessarily normalized. The exponent of this result is 48 less 
than the exponent resulting from an unrounded single precision instruction using the same operands. 

This instruction is intended for use in multiple precision floating point calculations. It may also be used to 
form the product of two integers providing the resulting product does not exceed 48 bits of significance. 
The operands must be packed in floating point format before executing this instruction. The results must 
be unpacked to obtain the integer product. 

I CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Multiply 

CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Multiply 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

DXi 

Xj*Xk 

Floating point DP product of (Xj) and 
(Xk) to Xi 

15 bits 

42ijk 


Example: 


Code Generated 


! LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 






42 345 



0X3 

X4 ♦ X5 1 

1 


8.4.39 INTEGER MULTIPLY INSTRUCTION 

The CPU integer multiply instruction is, to COMPASS, synonymous with the double precision floating point 
multiply instruction. Regardless of how it is written in COMPASS, the 42ijk instruction is executed as 
follows: If each operand register has all zeros or all ones in its leftmost 12 bits, the 47-bit integer product 
is formed in Xi with sign extension in its leftmost 12 bits. (Exception: if each operand has bit 47 different 
from its sign bit, the result is shifted left one bit position.) Otherwise, a double precision floating point 
multiplication is performed. Thus, there is no need to pack exponents into the operands, and unpack the 
result, for an integer multiply. COMPASS provides the alternate symbolic representations IXi Xj*Xk and 
DXi Xj*Xk for the 42ijk instruction as an aid to program readability, so the programmer can indicate 
whether or not the instruction is being used for integer multiplication. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Multiply 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Multiply 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

IXi 

Xj*Xk 

Integer product of (Xj) and (Xk) to Xi 

15 bits 

42ijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

42234 



1X2 

1 

X3*X4 j 

l 


8.4.40 MASK INSTRUCTION 

This instruction clears register Xi and forms a mask in it. A positive value for expression jk defines the 
number of ones in the mask as counted from the highest order bit in Xi* A negative value for expression jk 
defines the number of 0 bits (unmasked) counted from the low order bit in Xi. The completed masking 
word consists of ones in the high order bit positions of the word and zeros in the remainder of the word. 

The contents of operand register i are zero when jk is zero. The contents of operand register i are all ones 
when jk is 60. 


This instruction is intended for generating masks for logical operations. Used with the shift instruction, 
this instruction creates an arbitrary field mask faster than by reading a previously generated mask from 
storage. 


In COMPASS notation, if the value of absolute expression jk is positive, the assembler inserts it into the jk 
field of the assembled instruction. If the value of absolute expression jk is negative, the assembler adds 60 
to the expression value and places the sum in the jk field of the assembled instruction. 

A negative jk value less than -60 results in a type 7 assembly error. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Shift 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Shift 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

MXi 

jk 

Form mask in Xi, + jk bits 

15 bits 

43ijk 


Example: 

Code Generated 


43042 

43360 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

I 30 







MX0 

42B 

1 



MX3 

-14B 

1 


8.4.41 UNROUNDED SP FLOATING POINT DIVIDE INSTRUCTION 

This instruction divides two normalized floating point quantities obtained from operand registers Xj 
(dividend) and Xk (divisor) and packs the quotient in operand register Xi. 

CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Divide 
CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Divide 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

FXi 

Xj/Xk 

Floating point divide of (Xj) by (Xk) 
to Xi 

15 bits 

44ijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

44631 

1 


11 

18 130 



FX6 

x3/xi ; 


8.4.42 ROUNDED SP FLOATING POINT DIVIDE INSTRUCTION 

This instruction divides the floating quantity from operand register Xj (dividend) by the floating point 
quantity from operand register Xk (divisor) and packs the rounded quotient in operand register Xi. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Divide 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Floating Divide | 


Format: 


Ope ration 

Variable 

Description 

Size 

Octal Code 

RXi 

Xj/Xk 

Rounded floating point division of (Xj) 
by (Xk) to Xi 

15 bits 

45ijk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

1*5724 



RX 7 

X2/X4 j 


8.4.43 PASS INSTRUCTION 

The no-operation (pass) instruction is not associated with a functional unit. This instruction is a do-nothing 
instruction used typically to pad the program between steps. An integer value in the variable field 
(optional) is inserted into the lower 8 bits of the instruction. The assembler automatically pads the 
remainder of a word whenever a force upper occurs; in this case, the programmer is not required to insert 
the NO. 

On a machine with a Compare/Move Unit (CMU), a value of n greater than or equal to 400g causes the 
instruction to be interpreted as a CMU instruction. 

On a CYBER 170/Model 175, 740, 750, or 760, a value of n greater than or equal to 400g is illegal. | 

CYBER 70/Model 74 or 6600/6700 Functional Unit: None 
CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: None | 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

NO 


Pass 

15 bits 

46000 

NO 

n 

Pass 

15 bits 

46n 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

46000 

1 


II 

18 130 



NO 

-1- 

1 
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8.4.44 POPULATION COUNT INSTRUCTION 


This instruction counts the number of 1 bits in operand register Xk and stores the count in the lower order 
I 6 bits of operand register Xi. Bits 59 through 06 are cleared. 

If Xk is a word of all ones, a count of 60 (decimal) is delivered to the Xi register. If Xk is a word of all 
zeros, a zero word is delivered to the Xi register. 

The assembler sets the unused j designator to k. 

I CYBER 70/Model 74 or 6600/6700 Functional Unit: Floating Divide 

CYBER 170/Model 175, 176, 740, 750, or 760 and the 
CYBER 70/Model 76 or 7600 Functional Unit: Population Count 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

CXi 

10c 

Count of number of l's in (Xk) to Xi 

15 bits 

47ikk 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


n 

18 

Uo 

47700 



GY7 

xo ! 


8.4.45 SET A REGISTER INSTRUCTIONS 

These instructions are intended for fetching operands from storage for computation and for delivering 
results back into storage. The instructions have two destination registers: the Ai register, which receives 
the address formed from the operands, and either the Xi register or a CM (SCM) storage location. 

Operands are obtained from address (A), index (B), and operand (X) registers as well as from the 
instruction itself (K = 18-bit operand). Operands obtained from an Xj operand register are the truncated 
lower 18 bits of the 60-bit word. The highest order bits are ignored; an overflow condition is also ignored. 

If the i designator is nonzero, a storage reference is made using the lower 15, 16, or 17 bits of the resulting 
sum or difference as the relative storage address depending on machine size. The upper bits are ignored. 
The type of storage reference is a function of the i designator value, as follows: 

i = 0; no storage reference 

i = 1, 2, 3, 4, or 5; contents of CM (SCM) relative address (Ai) to register Xi 
i = 6 or 7; contents of register Xi stored at CM (SCM) relative address (Ai) 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Increment 

CYBER 170/Model 175, 176, 740, 750, or 760 and the | 
CYBER 70/Model 76 or 7600 Functional Unit: Increment | 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

SAi 

Aj+K 

Set Ai to (Aj)_+ K 

30 bits 

50ijK 

SAi 

K 

Set Ai to K 

30 bits 

51iOK 

SAi 

Bj+K 

Set Ai to (Bj) + K 

30 bits 

51ijK 

SAi 

Xj+K 

Set Ai to (Xj) + K 

30 bits 

52ijK 

SAi 

Xj 

Set Ai to (Xj) 

15 bits 

53ij0 

SAi 

Xj+Bk 

Set Ai to (XJ) + (Bk) 

15 bits 

53ijk 

SAi 

Bk+Xj 

Set Ai to (Xj) + (Bk) 

15 bits 

53ijk 

SAi 

Aj 

Set Ai to (Aj) 

15 bits 

54ij0 

SAi 

Aj+Bk 

Set Ai to (Aj) + (Bk) 

15 bits 

54ijk 

SAi 

Bk+Aj 

Set Ai to (Aj) + (Bk) 

15 bits 

54ijk 

SAi 

Aj-Bk 

Set Ai to (Aj) - (He) 

15 bits 

55ijk 

SAi 

-Bk+Aj 

Set Ai to (Aj) - (He) 

15 bits 

55ijk 

SAi 

Bj 

Set Ai to (Bj) 

15 bits 

56ij0 , 

SAi 

Bj+Ek 

Set Ai to (Bj) + (Bk) 

15 bits 

56ijk 

SAi 

-Bk 

Set Ai to (BO) - (Bk) 

15 bits 

57i0k 

SAi 

Bj-Bk 

Set Ai to (Bj) - (He) 

15 bits 

57ijk 

SAi 

-Bk+Bj 

Set Ai to (Bj) - (Bk) 

15 bits 

57ijk 
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Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 




n 

18 

130 

5010000001 

— 


SA1 

A0 ♦ 1 

-1- ■— 

i 

510"777774 



SA0 

-3 


5121000003 



SA2 

3*B1 

1 

5231777771 



SA3 

X1-6 

1 

53411 



SA4 

X1>B1 


54541 



SA5 

A4>81 

I 

54641 



SA6 

A4+B1 

1 

| 

54540 



SA5 

A4 


55641 



SA6 

-B1+A4 

i 

1 

56711 



SAT 

Bl + Bt 


57721 



SA7 

B2-B1 

i 


8.4.46 SET B REGISTER INSTRUCTIONS 

These instructions perform one's complement addition and subtraction of 18-bit operands and store an 
18-bit result in index register Bi. Note the result will never be -0 unless -0 is added to -0. 

Operands are obtained from address (A), index (B), and operand (X) registers as well as from the 
instruction itself (K = 18-bit operand). Operands obtained from an Xj operand register are the truncated 
lower 18 bits of the 60-bit word. The highest order bits are ignored; an overflow condition is also ignored. 

If the i designator is a zero, the instruction is a do-nothing instruction. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Increment 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Increment | 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

SBi 

Aj+K 

Set Bi to (Aj) + K 

30 bits 

60ijK 

SBi 

K 

Set Bi to K 

30 bits 

61iOK 

SBi 

Bj+K 

Set Bi to (Bj) + K 

30 bits 

61ijK 

SBi 

Xj+K 

Set Bi to (Xj) + K 

30 bits 

62ijK 

SBi 

Xj 

Set Bi to (Xj) 

15 bits 

63ij0 

SBi 

Xj+Bk 

Set Bi to (Xj) + (Bk) 

15 bits 

63ijk 

SBi 

Bk+Xj 

Set Bi to (Xj) + (Bk) 

15 bits 

63ijk 

SBi 

Aj 

Set Bi to (Aj) 

15 bits 

64ij0 

SBi 

Aj+Bk 

Set Bi to (Aj) + (Bk) 

15 bits 

64ijk 

SBi 

Bk+Aj 

Set Bi to (Aj) + (Bk) 

15 bits 

64ijk 

SBi 

Aj-Bk 

Set Bi to (Aj) - (Bk) 

15 bits 

65ijk 

SBi 

-Bk+Aj 

Set Bi to (Aj) - (Bk) 

15 bits 

65ijk 

SBi 

Bj 

Set Bi to (Bj) 

15 bits 

66ij0 

SBi 

Bj+Bk 

Set Bi to (Bj) + (Bk) 

15 bits 

66ijk 

SBi 

-Bk 

Set Bi to (BO) - (Bk) 

15 bits 

67i0k 

SBi 

Bj-Bk 

Set Bi to (Bj) - (Bk) 

15 bits 

67ijk 

SBi 

-Bk+Bj 

Set Bi to (Bj) - (Bk) 

15 bits 

67ijk 


60492600 G 


8-47 








Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

6011777772 



661 

fll-5 

-1--- 

1 

6110777772 



661 

-5 


6121000011 



S82 

3+01+6 

1 

1 

6231000100 



SB3 

Xl+1000 

| 

*3 427 



604 

X2 + R7 

1 

64541 



SB5 

A4 + B1 

1 

1 

6451.0 



SB*5 

84 

1 

65641 



606 

—01+84 

1 

1 

65643 



S06 

84-B3 

1 

I 

66711 


' 

6R7 

Bi+Bl 

1 

63761 


■ • 

6B7 

B5-ei 

1 

1 


8.4.47 SET X REGISTER INSTRUCTIONS 

The SXi instructions perform one's complement addition and subtraction of 18-bit operands and store an 
18-bit result into the lower 18 bits of operand register Xi. The sign of the result is extended to the upper 
42 bits of operand register Xi. An overflow condition is ignored. 

Operands are obtained from address (A), index (B), and operand (X) registers as well as the instruction 
itself (K = 18-bit operand). Operands obtained from an Xj register are the truncated lower 18 bits of the 
60-bit word. The highest order bits are ignored. 
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CYBER 70/Model 74 or 6600/6700 Functional Unit: Increment 

CYBER 170/Model 175, 176, 740, 750, or 760 and the I 
CYBER 70/Model 76 or 7600 Functional Unit: Increment 1 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

SXi 

Aj+K 

Set Xi to (Aj) + K 

30 bits 

70ijK 

SXi 

K 

Set Xi to K 

30 bits 

71i0K 

SXi 

Bj+K 

Set Xi to (Bj) + K 

30 bits 

71ijK 

SXi 

Xj+K 

Set Xi to (Xj) + K 

30 bits 

72ijK 

SXi 

Xj 

Set Xi to (Xj) 

15 bits 

73ij0 

SXi 

Xj+Bk 

Set Xi to (Xj) + (Bk) 

15 bits 

73ijk 

SXi 

Bk+Xj 

Set Xi to (Xj) + (Bk) 

15 bits 

73ijk 

SXi 

Aj 

Set Xi to (Aj) 

15 bits 

74ij0 

SXi 

Aj+Bk 

Set Xi to (Aj) + (Bk) 

15 bits 

74ijk 

SXi 

Bk+Aj 

Set Xi to (Aj) + (Bk) 

15 bits 

74ijk 

SXi 

Aj-Bk 

Set Xi to (Aj) - (Bk) 

15 bits 

75ijk 

SXi 

-Bk+Aj 

Set XL to (Aj) - (He) 

15 bits 

75ijk 

SXi 

Bj 

Set Xi to (Bj) 

15 bits 

76ij0 

SXi 

Bj+Bk 

Set XL to (Bj) + (Bk) 

15 bits 

76ijk 

SXi 

-Bk 

Set Xi to (B0) - (Bk) 

15 bits 

77i0k 

SXi 

Bj-Bk 

Set Xi to (Bj) - (Bk) 1 

15 bits 

77ijk 

SXi 

-Bk+Bj 

Set Xi to (Bj) - (Bk) 

15 bits 

77ijk 
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Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

! 30 






7000006233 + 



sxo 

nNEH+A3+1 

1 !--- 

1 

7110775755 



5 x 1 

-7022B 

1 

7121000005 



5X2 

51 + 5 


7233777744 



SX3 

X3-339 

1 

1 

73442 



*X4 

X4 + B2 

1 

74553 



5X5 

85 + 83 

1 

74540 



SX 5 

84 


75641 



SX6 

-Bl+84 

1 

1 

75604 



SX6 

80-B4 

1 

76776 



5X7 

B7 + 96 

1 

1 

77751 



5X7 

B5-B1 

1 


8.5 CMU SYMBOLIC MACHINE INSTRUCTIONS 

The Compare/Move Unit (CMU) is a standard CPU hardware component of the CYBER 70 Series Model 72 
| and Model 73, and the CYBER 170/Models 172, 173, 174, 720, and 730. It provides CPU instructions for 
moving and comparing data fields that consist of strings of 6-bit characters. Data fields can span word 
boundaries and can begin and end at any character position within a word. A data field is specified by its 
length in characters and the location of its leftmost character (according to word address and character 
position). Data fields cannot be in the operating registers nor in ECS. 

Each 60-bit word of a data field contains 10 character positions numbered 0 to 9 from left to right (high 
order to low order). 

COMPASS provides a symbolic forms of the four CMU instructions plus a pseudo instruction used to 
generate a descriptor word to be referenced by the indirect move instruction. Of the four instructions, the 
indirect move (IM) instruction is the only one that syntactically resembles other CPU instructions. The 
other three instructions have formats dissimilar to CPU instructions and are generated through COMPASS 
pseudo instructions. All of these instructions must begin at the top of a 60-bit word; COMPASS automat¬ 
ically forces upper before each of them unless the location field contains a minus sign. All but IM are 60 
bits in length. IM is 30 bits, but the hardware requires that the instruction be in the upper half of its word. 
The lower half of the word is not executed. COMPASS automatically forces upper following IM, unless the 
next instruction has a minus sign in its location field. 
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8.5.1 IM - INDIRECT MOVE 


The indirect move instruction moves the contents of a data field to another location. It is a 30-bit 
instruction that specifies the address of a descriptor word which, in turn, contains the length and address of 
the data fields. 

The assembler forces upper before and after the IM instruction. 

The descriptor word is fetched from storage location (Bj)+K. If the data field length is zero, the 
instruction is executed as a pass but the execution time is longer. Otherwise, the contents of the source 
field are moved to the destination field. If the two fields overlap, the results are undefined. The XO 
register is used for intermediate storage during execution of the instruction, and is cleared upon 
completion of the instruction. 


Operation 

Variable 

Description 

Octal Code 

IM 

K 

Move data according to word at K 

4640K 

IM 

Bj+K 

Move data according to word at (Bj)+ K 

464jK 

IM 

Bj 

Move data according to word at (Bj) 

464j 000000 


8.5.2 MD - INDIRECT MOVE DESCRIPTOR WORD 

The MD pseudo instruction generates a descriptor word for use by the indirect move (IM) instruction. 
Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELOS 

sym 

MD 

*’ k s’V k d’ C d 


sym If present, sym is assigned the value of the location counter after the force upper occurs. It 
becomes the symbolic address of the descriptor word. 

H. Absolute address expression specifying the field length in characters (0 through 8191). The 

upper 9 bits (£) are placed in bits 56 through 48 of the descriptor word; the lower 4 bits (4) are 
placed in bits 29 through 26. 

k s An expression specifying the first word address of the source field in CM. 

c s An absolute expression (0 through 9) specifying the starting character position of the source 

field within the word at location k s . Characters are numbered from left to right. 

k(j An expression specifying the first word address of the destination field in CM. 

C{j An absolute expression (0 through 9) specifying the starting character position of the 

destination field within the word at location k^. 
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Indirect Move Descriptor Word format: 


00 


59 48 30 26 22 18 




source 

. Isrc 

des 

destination 

u 

f 12-4 

address 

*3-0ch 

1 

ch 

address 


Example: 


Code Generated 




LOCATION 

OPERATION 

VARIABLE COMMENTS 


] 


II 

18 130 

00760050004005u070Q0 


DWORD 

MD 

• 

lOuO,3UFFA,0,8UFFB,5 

1 

4640010665 



• 

• 

14 

1 

DWORD * 

1 


BUFFA is at address 2560; BUFFB is at address 3584. 


8.5.3 DM - DIRECT MOVE 

The direct move (DM) pseudo instruction generates a CMU instruction that moves the contents of a data 
field to another data field. The machine instruction occupies one full word. The instruction includes its 
own data field descriptor. 

The assembler forces upper before a DM instruction. 

If the data field length is zero, the instruction is executed as a pass, but the execution time is longer. 
Otherwise, the contents of the source field are moved to the destination field. If the two fields overlap, 
the results are undefined. The XO register is used for intermediate storage during execution of the 
instruction and is cleared upon completion of the instruction. 

Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

DM 

f,k ,c ,k ,e 
s s d d 


sym If present, sym is assigned the value of the location counter after the force upper occurs. It 
becomes the symbolic address of the instruction word. 

f Absolute address expression specifying the field length in characters (0 through 127). 

k s An expression specifying the first word address of the source field in CM. 

c s An absolute expression (0 through 9) specifying the starting character position of the source 

field within the word at location k s . 5 

k<j An expression specifying the first word address of the destination field in CM. 

c<j An absolute expression (0 through 9) specifying the starting character position of the 

destination field within the word at location k^. Characters are numbered from left to right. 
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Octal format of instruction: 


59 51 48 


30 26 22 18 


00 


465 


6-4 

I 


source 

address 


i Isrc 
3-dch 
I 


des 

Ich 


destination 

address 


Example: 


Code Generated 

4657005000 74050G70GQ 



LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

IB 1 30 



04 

127,1UFFft, G,lBUFFn,5 


8.5.4 CC - COMPARE COLLATED 


The compare collated (CC) pseudo instruction generates a CMU instruction that compares the contents of 
two data fields, one character at a time, from left to right, until a pair of corresponding characters is 
found to have unequal collating values or until the data fields are exhausted. It is a 60-bit instruction that 
occupies one full word. It cannot be split between two words. The instruction includes its own data field 
descriptor. Register A0 contains the first word address of a table in storage that contains the collating 
values to be used in comparing characters. The result of the comparison is placed in register X0. 

The first word address of the collating table is obtained from register A0. The contents of the data fields 
are compared from left to right, one character at a time from each field, until two unequal characters are 
found. The collating value of each character is obtained from the collating table. If these values are 
equal, the compare continues until another character pair is unequal or until all characters have been 
compared. If the collating values are unequal, the two data fields are unequal and the field with a larger 
collating value is the greater of the two fields. The collating values are treated as 6-bit unsigned integers. 
Note that two unequal characters could have the same collating value and would compare equal. 

Upon instruction completion, register X0 contains a 60-bit signed integer as follows: 

(Field A)>(Field B) (X0)=£-n; (X0)>0 I 

(Field AMField B) (X0)=0 

(Field A)<(Field B) (X0)=n-£; (X0)<0 

n is the number of pairs of characters that compared equal. If £=0, then (X0) is 0. 


The format of the collating table for 6-bit characters is: 


(AO) 

( A 0)+1 


(AO)+7 
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Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

CC 

f,k a’ C a’V C b 


sym If present, sym is assigned the value of the location counter after the force upper occurs. It 
becomes the symbolic address of the instruction. 

f Absolute address expression specifying the field length in characters (0 through 127). 

k a An expression specifying the first word address of the first data field in CM. 

c a An absolute expression specifying the starting character position of the first data field within 

the word at location k a . Characters are numbered from left to right. 

kb An expression specifying the first word address of the second data field in CM. 

c b An absolute expression (0 through 9) specifying the starting character position oi the second 

data field within the word at location k^. 


Octal format of instruction: 


59 


51 48 


30 26 22 18 


00 


466 


first string 
l 6-'4 address 
_l_ 


f J fs 

ss 

*3-0 ch 
_I_ 

ch 


second string 
address 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

5100003120 

46670050007405u07000 

1 


I! 

18 130 



SA0 

CC 

TABLE 1 

127,BUFFA,0,BUFFB,5 

i 


8.5.5 CU - COMPARE UNCOLLATED 

The compare uncollated (CU) pseudo instruction generates a CMU instruction that compares the contents 
of two data fields, one character at a time, from left to right, until a pair of corresponding characters are 
found to have unequal values or until the data fields are exhausted. The machine instruction is a 60-bit 
instruction that occupies one full word and cannot be split between two words. It includes its own data 
field descriptor. The result of the comparison is placed in register XO. 

Execution resembles the CC instruction except that AO and the collating table are not used. Instead, tne 
characters are compared directly with each character regarded as a 6-bit unsigned binary integer. 
Register X0 is set in the same manner as by the CC instruction. 
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Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 

sym 

cu 

£,k a ,c a ,k b ,c b 


sym If present, sym is assigned the value of the location counter after the force upper occurs. It 
becomes the symbolic address of the instruction. 

t Absolute address expression (0 through 127) specifying the field length in characters. 

k a An expression specifying the first word address of the first data field in CM. 

c a An absolute expression (0 through 9) specifying the starting character position of the first data 

field within the word at location k a . Characters are numbered from left to right. 

k^ An expression specifying the first word address of the second data field in CM. 

05 An absolute expression (0 through 9) specifying the starting character position of the second 

data field within the word at location k^. 

Octal format of instruction: 


59 


51 48 


30 26 22 18 


00 


467 


. I first string 
address 


C 3-0 


fs 

ch 


ss 

ch 


second string 
address 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

W70Q50C0 74 0500 70 2 3 

l 


II 

18 130 


| 

C'J 

12 7, 3UFPA, 0,j*UFF9,5 

1 

1 
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PPU SYMBOLIC MACHINE INSTRUCTIONS 


9 


The COMPASS assembler recognizes symbolic notation for peripheral processor unit (PPU) 
instructions. When a PPU or PERIPH pseudo instruction is in the first statement group, the assembler 
identifies each symbolic instruction by name and generates a one word (12 bit) or two word (24 bit) 
object code machine instruction under control of the current origin, location, and position counters. 

All PPU code is absolute. Numeric data must be in integer notation. Floating point notation is illegal. 


9.1 MACHINE INSTRUCTION FORMATS 

An assembled instruction has a 12-bit or 24-bit format. The 12-bit format has a 6-bit operation code f 
and a 6-bit operand d. A PPU accomplishes program indexing and manipulates operands in several 
modes. The 12-bit and 24-bit instruction formats provide for 6-bit, 12-bit, or 18-bit operands and 
6 -bit or 12-bit addresses. Figures 9-1 and 9-2 illustrate the 12-bit instruction format and the 24-bit 
instruction format, respectively. 


Direct Mode: 

d = memory address of operand 
Indirect Mode: 

d = memory address of the address 
of the operand 

11 06 05 00 No Address Mode: 

d = 6-bit operand, shift count, or 
relative address 


operation 

code 


(P) 


Other: 

d = special value; e. g., channel designator 
Figure 9-1. PPU 12-bit Instruction Format 
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The 24-bit format uses the 12-bit quantity m, which is the contents of the next program address (P + 1), 
with d or the contents of d to form an 18-bit operand or a 12-bit operand address. 


operation 

code 



Figure 9-2. PPU 


Indexed Mode: 

d = address of the index for 
modifying the address of 
the operand 

m = base address of the operand 
(d) + m = address of operand 

Constant Mode: 

dm = 18-bit operand 

Other: 

dm = special values; e. g., d = channel 
designator and m = 12-bit address 
of word count on IAM and OAM 
instructions 

:-bit Instruction Format 


9.2 SYMBOLIC NOTATION 

This section describes notation used for coding symbolic PPU machine instructions. Instructions are 
described in octal operation code sequence which generally reflects the mode of addressing. 
Instructions unique to a computer system are identified as such. 

The location field of a symbolic PPU machine instruction optionally contains a location symbol. When 
the symbol is present, it is assigned the value of the location counter. 

The operation field of a symbolic PPU machine instruction contains a three-character name. 

The variable field contains one or two subfields. Each subfield contains an absolute or relocatable 
expression that reduces to a 6-bit, 12-bit, or 18-bit value. 

Designators used in this section are listed in table 9-1. 

Generally, the third character of the instruction mnemonic (N, D, M, C, or I) indicates the mode of 
addressing: 

N No operand address reference 
D Direct operand address: d contains operand 
M Memory address m or m + (d) contains operand 
C 18-bit constant 
I Indirect; operand address is (d) 
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TABLE 9-1. PERIPHERAL PROCESSOR INSTRUCTION DESIGNATORS 


Designator 

Use 

A 

18-bit A register 

c 

An expression that reduces to an 18-bit operand value. 

d 

A 6-bit operand or operand address expression. 

m 

A 12-bit expression value used with d or (d) to form an 18-bit operand or 12-bit 
operand address. 

p 

12-bit Program Address register 

Q 

12-bit Q register 

r 

An expression that reduces to a 6-bit value (-37 g <r< 37 8 ) 
specifying relative address or shift count 

0 

Contents of a register or location 

((» 

Refers to indirect addressing 


Some of the instructions provide similar functions using different modes of addressing. They can be 
grouped according to function as shown below: 

Function Description 


Data transmission 


The following instructions either load data into the A register or store 
data from it. A load instruction loads a 6-bit, 12-bit, or 18-bit value 
as indicated by the instruction; any remaining upper bits of A are zeroed, 
except for the LCN instruction for which remaining bits are set to one. 

A store instruction stores the lower 12 bits of the A register contents into 

a memory location indicated by the 

instruction. 

The contents of A are 

not altered. 


Instruction 

Octal Code 

Section 

LDN 

14 

9.2.3 

LCN 

15 

9.2.3 

LDC 

20 

9. 2.4 

LDD 

30 

9.2.9 

STD 

34 

9.2.9 

LDI 

40 

9.2.10 

STI 

44 

9. 2.10 

LDM 

50 

9.2.11 

STM 

54 

9. 2.11 
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Function (cont'd) 


Description (cont'd) 


Arithmetic 


Logical 


A PPU arithmetic instruction adds or subtracts a 6-bit, 12-bit, or 
18-bit quantity from the contents of the A register and enters the result 
in A. 


Instruction 

Octal Code 

Section 

ADN 

16 

9.2.3 

SBN 

17 

9.2.3 

ADC 

21 

9.2.4 

ADD 

31 

9. 2.6 

SBD 

32 

9.2.6 

ADI 

41 

9.2.7 

SBI 

42 

9. 2.7 

ADM 

51 

9. 2.8 

SBM 

52 

9. 2.8 


A logical instruction forms a logical value in A using die contents of A 
as one of the operands and a 6-bit, 12-bit, or 18-bit value indicated by 
the instruction as die second operand. When the second operand is 
fewer than 18 bits, the remaining upper bits of A are unaltered, except 
for the LPN instruction for which the upper 12 bits are zeroed. 

Formation of a logical difference is equivalent to setting each bit in A 
that is unlike the corresponding bit in the second operand. For example. 

Initial (A) =0101 

Operand =1100 

Final (A) =1001 

Formation of a logical product is equivalent to setting a bit in A when 
the original setting of the bit in A and the corresponding bit in the second 
operand are both one's. 

For example, 

Initial (A) =0101 

Operand = 1100 

Final (A) =0100 

A selective clear sets a bit zero in the A register wherever a bit is set 
in the second operand. For example, 

Initial (A) =0101 

Operand = 1100 

Final (A) =0001 
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Function (cont'd) 


Description (cont'd) 


Logical (cont'd) Logical instructions include the following: 


Instruction 

Octal Code 

Section 

LMN 

11 

9.2.3 

LPN 

12 

9.2.3 

SCN 

13 

9.2.3 

LPC 

22 

9. 2.4 

LMC 

23. 

9. 2.4 

LMD 

33 

9.2.9 

LMI 

43 

9.2.10 

LMM 

53 

9.2.11 


Replace A replace instruction performs an arithmetic operation and returns the 

results to the A register and the memory location from which one operand 
was obtained. The lower 12 bits of the result replaces the operand 
obtained from a memory location. Replace instructions include the 
following: 


Instruction 

Octal Code 

Section 

RAD 

35 

9.2.9 

AOD 

36 

9.2.9 

SOD 

37 

9.2.9 

RAI 

45 

9.2.10 

AOI 

46 

9.2.10 

SOI 

47 

9.2.10 

RAM 

55 

9.2.11 

AOM 

56 

9.2.11 

SOM 

57 

9.2.11 


9.2.1 BRANCH INSTRUCTIONS 

For branch instructions, the r subfield is a numeric value that indicates the number of locations to be 
jumped (maximum 31). When r is positive (01 through 37g), the jump is forward r locations. When r is 
negative (-76g through -40g), the jump is backward 77g-r locations. In the following tests, negative 
zero (777777) is nonzero. For conditional instructions, when the test condition is true, the jump takes 
place. When the condition is not met, execution continues with the next instruction. 


NOTE 

The jump count must not be 00 or 77. If it is, execution loops on 
the jump instruction. 


The J option of the PPU instruction (section 4.3.3) and the PERIPH Instruction (section 4.3.4) cause the 
value of the location counter to be subtracted from the value of the symbolic address (tag) before it is 
placed in the d field of the object code instruction. 
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Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

LJM 

m, d 

Long jump to m+(d); if d = 0, m is not 
modified 

24 bits 

01 dm 

RJM 

m,d 

Return jump to m+(d); Store P+2 at m+(d) 
and jump to m+(d)+l. 

24 bits 

02 dm 

UJN 

rt 

Unconditional jump to P+r locations 

12 bits 

03d 

UJN 

tag 

Unconditional jump to tag 

12 bits 

03d 

ZJN 

rt 

Zero jump; jump to P+r locations if 
(A) = 0 

12 bits 

04d 

ZJN 

tag 

Zero jump to tag 

12 bits 

04d 

NJN 

rt 

Nonzero jump; jump to P+r locations if 
(A) 4 0 

12 bits 

05d 

NJN 

tag 

Nonzero jump to tag 

12 bits 

05d 

PJN 

rt 

Positive jump; jump to P+r locations if 
(A)>0 

12 bits 

06d 

PJN 

tag 

Positive jump to tag 

12 bits 

06d 

MJN 

rt 

Minus jump; jump to P+r locations if 
(A)< 0 

12 bits 

07d 

MJN 

tag 

Minus jump to tag 

12 bits 

07 d 


tlf PPU J or PERIPH J option has been selected, r is not valid. The contents of the variable field must 
be a symbolic address (tag). 


Examples: 

Code Generated 

0100 1762 
. 0271 0000 
0 "* 71 
0UP4 
0*25 
06*7 
0726 


LOCATION 


OPERATION 


II 


LJM 

UJ*! 

7JN 

NJN 

PJM 

MJN 


VARIABLE 


18 


ST ART 
0 » CTO 

TAG3 

TflG?-* 

TflG<* 


COMMENTS 


I 30 


I 


In the above examples, the LJM instruction is at address 0014g. TAG1 is address 0012g, TAG2 has a 
value of 13g, TAG3 has a value of 25g, and TAG4 has a value of 26g. 
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Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


I 


11 

IB 

130 




PPU 

j 

—I- 

i 

i 

0747 



UJN 

TftGl 

1 

1 

04P4 



7JN 

TAG 7 

I In this example, the UJN is at 

1 address 0040. TAG1 is address 

0556 



NJM 

T6GP+10 

I 0010, TAG2 is 0011, TAG3 is 
| address 0045, and TAG4 is 

060? 



PJN 

-1++AG4 

j address 0046. 

0 7 4’ 



MJN 

TAG1 

1 

1 


9.2.2 SHIFT INSTRUCTION 

The SHN instruction shifts the contents of the A register right or left r places. If r is positive (+1 to 
+31), the shift is left circular r places; if r is negative (-31 to -1), the shift is end off r places to the 
right with no sign extension. No shift takes place when r is + 0. The assembler places the value of 
the r expression in the d field. If -31 >r >31, the assembler generates an address error. 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

SHN 

r 

Shift (A) by + (left) or - (right) r bits 

12 bits 

lOr 


Examples: 


1. Shift contents of A left circular 6 places 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

16 

1 30 





- - 

1006 



PHN 

! 


2. Shift contents of A right end off 6 places 


Code Generated 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


11 

18 

| 30 






: I . _ 

1071 

6 



S^T 

SHN 

-SPNT [ 


9.2.3 NO ADDRESS MODE INSTRUCTIONS 

In this mode, during instruction execution, the contents of the d field are interpreted as a 6-bit 
positive operand. This mode eliminates the need for storing many constants in core. 
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Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

LMN 

d 

Logical difference (A)-d—-A 

12 bits 

lid 

LPN 

d 

Logical product (A)*d~*\A 

12 bits 

12 d 

SCN 

d 

Selective clear (A) 

12 bits 

13d 

LDN 

d 

Load d~* A 

12 bits 

14d 

LCN 

d 

Load complement d-»A 

12 bits 

15d 

ADN 

d 

Add (A)+d—A 

12 bits 

16d 

SBN 

d 

Subtract (A)-d—A 

12 bits 

17d 


Examples: 


Code Generated 

— 

LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

I 30 

1112 



LMN 

120 

-1.. 

1207 



LPN 

7 


1321 



SCN 

21P 


15 

1415 


aft 

SPT 

LCN 

150 
ft A 

1 

1 

1514 



LCN 

ftft-1 

1 

1501 



AON 

t 

1 

I 

1702 



SON 




9.2.4 CONSTANT MODE INSTRUCTIONS 

In this mode, during instruction execution, the contents of the d and m fields are taken directly as an 
operand. This mode also eliminates the need for storing many constants. The assembler reduces 
absolute or relocatable expression c to an 18-bit value and stores the upper six bits in d and the lower 

12 bits in m. 


9-8 


60492600A 







Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

LDC 

c 

Load c -*A 

24 bits 

20 dm 

ADC 

c 

Add (A)+c —A 

24 bits 

. 21dm 

LPC 

c 

Logical product (A) *e -*A 

24 bits 

22 dm 

LMC 

c 

Logical difference (A)-c —A 

24 bits 

23dm 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 



1 


11 

18 

Uo 

2070 

7070 



LDC 

707070B 

—1- 

1 

1 

2177 

0 

7 776 


VAL 

A DC 

0 

VAL-1 

1 

1 

1 

1 

2207 

0707 



LPC 

070707B 

1 

1 

2307 

70707 

0707 


MASK 

SET 

LMC 

070707B 

MASK 

1 

1 

1 

i 


9.2.5 NO OPERATION INSTRUCTION 

The PSN instruction specifies that no operation is to be performed. It provides a means of padding 
a program. 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

PSN 


No operation (Pass) 

12 bits 

2400 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

24H0 



PSN 

- -:- 


Other octal operation codes (not generated by COMPASS) that act as pass instructions are: 
CYBER 170 Series, CYBER 70/ 

Models 72, 73, 74 and 6000 Series CYBER 70/Model 76 and 7600 

00 25 

25 26 

27 

75 

76 
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9.2.6 EXCHANGE JUMP INSTRUCTIONS (CYBER 170 SERIES, 
CYBER 70/MODEL 71, 72, 73, 74 OR 6000 SERIES) 


The EXN instruction transmits an 18-bit (absolute) address from the A register to the CPU with a signal 
notifying the CPU to execute an exchange jump. The address in A is the starting location of the 16-word 
exchange package which contains information about the CPU program to be executed. The 18-bit initial 
address must be entered in A before the EXN instruction is executed. The CPU replaces the file with 
similar information from the interrupted CPU program. The PPU is not interrupted. The EXN instruc¬ 
tion does not affect the monitor flag bit. 


The MXN instruction conditionally exchange jumps to the CPU and initiates CPU monitor activity. If 
the monitor flag bit is clear, this instruction sets the flag and initiates the exchange. If the monitor 
flag bit is set, this instruction acts as a pass instruction. The starting address for this exchange is 
the 18-bit address in the PPU A register. This address must be entered in A before the MXN instruc¬ 
tion is executed. 

Execution of MAN resembles MXN. However, the exchange package address is taken from the 18-bit 
Monitor Address (MA) register in CPU d, rather than from the PPU A register. 

In a system with dual central processors, d can be 0 or 1 and specifies which CPU the exchange j um p 
will interrupt. In single processor systems, this value is not interpreted. 


Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

EXN 

d 

Exchange jump CPU d to (A) 

12 bits 

260d 

MXN 

d 

Monitor exchange jump CPU d to (A) 

12 bits 

261d 

MAN f 

d 

Monitor exchange jump CPU d to (MA) 

12 bits 

262d 


Examples: 


Code Generated 

1 



VARIABLE 

COMMENTS 


1 


11 

18 

130 

2601 



EXN 

l 

i 

2610 



MXN 

0 

i 

2623 



N*N 

3 

r 

1 

I 

i 


t CYBER 170 Series and CYBER 70/Model 71, 72, 73, and 74 only. 
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9.2.7 READ PROGRAM ADDRESS INSTRUCTION 

(CYBER 170 SERIES , CYBER 70/MODELS 71, 72, 73, 74, AND 6000 SERIES) 

This instruction transfers the contents of the CPU P register to the PPU A register; this allows the PPU 
to determine whether the CPU is in execution. In a dual central processor system, the lowest order bit 
of the instruction format specifies which CPU P register is to be examined. This bit is not interpreted 
for a single central processor system. 


Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

RPN 

d 

Read program address CPU d — A 

12 bits 

270d 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


I 


n 

18 

ho 






27C0 



RPN 

1 


For the 6000 and CYBER 70 series, the largest value that (P) can be is 17 bits. An ECS transfer is in 
progress when bit 17 of the A register is set. For the CYBER 170 series, the P register is 18 bits. 


9.2.8 6416 PPU INSTRUCTIONS 


COMPASS assembles the following instructions for execution on a 6416 computer system only. The 
ETN instruction initiates memory transfer operations by transmitting an 18-bit address from the 
PPU A register to the 6416 16K memory. This address points to a word having the following format: 


XO 

A0 

K 

59 36 18 00 

v - V---- V- ' v -V----' 


Starting Address 
in Extended Core Storage 


Starting Address 
in 16 K Memory 


Word Count 


Expression d of this instruction specifies the transfer to be performed: 

If d is 0, K words are transferred from ECS to 16K memory. 

If d is 1, K words are transferred from 16K memory to ECS. 

Note that addresses contained in the word are absolute addresses. Operating systems may require 
relocation (adding RA to an address) and field length testing, e. g., Is address + RA > FL? The 
Exchange Jump package contains RA and FL values for central memory and for extended core storage. 
The 6416 has no hardware for automatic relocation and field length testing; it is therefore incumbent 
upon the program to perform these functions whenever required by an operating system. 
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The ERN instruction examines the status of the data trunk between 16K memory and the extended core 
coupler. If the data trunk is busy (a transfer is in progress), a 1 is placed in the most significant bit 
position of the A register. If the trunk is free (not busy), the A register remains cleared. The d 
portion of this instruction is ignored. 

After execution of this instruction the program would typically test the A register for a sign before 
executing an instruction that initiates an ECS operation. 


Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

ETN 

d 

Extended core transfer 

12 bits 

26 Od 

ERN 

d 

Read extended core coupler status 

12 bits 

270d 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

2600 



ETN 


-1- 

1 

27 CO 



ERN 


1 

1 


9.2.9 DIRECT ADDRESS MODE INSTRUCTIONS 

In this mode, during instruction execution, the contents of the d field specify the address of the operand. 
During assembly, the assembler reduces absolute or relocatable expression d to a 6-bit value that 
specifies one of the first 100 8 addresses in core memory (0000 - 0077 g ). During instruction execution, 
(d) is treated as a positive 12-bit quantify. 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

LDD 

d 

Load (d)-*A 

12 bits 

30d 

ADD 

d 

■ Add (A) + (d)-*A 

12 bits 

31d 

SBD 

d 

Subtract (A) - (d) -*A 

12 bits 

32d 

LMD 

d 

Logical difference (A) and (d) —A 

12 bits 

33d 

STD 

d 

Store (A)-*d 

12 bits 

34d 

RAD 

d 

Replace add (d) + (A)—*-d and A 

12 bits 

35d 

AOD 

d 

Replace add (d) + l-*d and A 

12 bits 

36d 

SOD 

d 

Replace subtract one (d) - 1 —d and A 

12 bits 

37d 
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Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


U 

IB 

I 30 






3 01? 



LOO 

TftGl 

r 

i 

310? 



ft DO 

TA62-108 

i 

i 

3?63 



son 

60 3 

i 

i 

3 3 ? 7 



L^n 

TAG 1 + 1 <5-8 

i 

i 

?401 



sin 

t 

i 

i 

7 cr *5 



?an 

ssn 

i 

361? 



fiOO 

t ani 

i 

371? 



Snn 

TAG? 

i 

i 

i 


9.2.10 INDIRECT ADDRESS MODE INSTRUCTIONS 

In this mode, during instruction execution, d specifies an address, the contents of which specify the 
address of the desired operand. Thus, d specifies the operand address indirectly. 

During assembly, the assembler reduces absolute or relocatable expression d to a 6-bit value that 
specifies one of the first 100 addresses in core memory (0000 - 0077 ). 

O O 

On the 7600 (or CYBER 70/Model 76), the address formed permits referencing of all memory locations 
but one (0000 - 7776 J. 

O 

On a 6000 Series Computer System (as well as CYBER 170 Series or CYBER 70/Model 71, 72, 73 or 74) 
PPU, the address formed in indirect address mode permits referencing of all memory locations, 
including address 7777 . 

O 

Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

LDI 

d 

Load ((d))—A 

12 bits 

40d 

ADI 

d 

Add (A) + ((d))—A 

12 bits 

41 d 

SBI 

d 

Subtract (A) - ((d))—A 

12 bits 

42d 

LMI 

d 

Logical difference (A) - ((d))—A 

12 bits 

43d 

STI 

d 

Store (A)—(d) 

12 bits 

44d 

RAI 

d 

Replace add ((d)) + (A) —(d) and A 

12 bits 

45d 

AOI 

d 

Replace add one ((d)) + 1— (d) and A 

12 bits 

46d 

SOI 

d 

Replace subtract one ((d)) - 1 —(d) and A 

12 bits 

47 d 
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Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


2 


11 

18 

1 30 

4012 



LOI 

TAGl 

-1. .- 

1 

4102 



AO I 

TAG2-10 


4240 



Sot 

40 p 

1 

| 

4297 



LMT 

T AGi+15 p 

1 

I 

4401 



STI 

1 

1 

455=: 



9AI 

560 

i 

| 

4612 



AOT. 

TAG! 

1 

4713 



SOI 

TAG2 

1 


9.2.11 INDEXED DIRECT ADDRESS MODE INSTRUCTIONS 

In this mode, during instruction execution, the value formed by m+(d) is used as the address of the 
operand. During assembly, the assembler reduces absolute or relocatable expression d to a 6-bit 
value that specifies one of the first 100g addresses in core memory (0000 - 0077s). The value of 
absolute or relocatable expression mis a 12-bit base address. 

NOTE 

•The address formed in indexed addressing permits — 

referencing of all memory locations but one 
(0000-7776g). Although m and/or (d) can have a 
value of 7777g, the computer system does not 
permit m+(d) to reference address 7777g. 


When in indexed direct address mode, if d is nonzero the contents of address d are added to m to 
produce a 12-bit operand address (indexed addressing). If d is zero, m is taken as the operand address. 
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Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

LDM 

m,d 

Load (m-(d)) — A 

24 bits 

5 0dm 

ADM 

m,d 

Add (A) + (m+(d))—A 

24 bits 

51dm 

SBM 

m, d 

Subtract (A) - (m+(d)) -*A 

24 bits 

52dm 

LMM 

m,d 

Logical difference (A) - (m-(d))—A 

24 bits 

53dm 

STM 

m, d 

Store (A)—-m-(d) 

24 bits 

54dm 

. 

RAM 

m,d 

Replace add (m+(d)) - (A)—m-(d)and A 

24 bits 

55dm 

AOM 

m,d 

Replace add one (m-(d)) - 1—m-(d) and A 

24 bits 

56dm 

SOM 

m,d 

Reylj^ce subtract one (m-(d)) - 1—m-(d) 

24 bits 

57dm 


£xampLes: 

Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

1 


11 

18 130 

5077 0203 



LDM 

-- — ---- 

T AGb,77B I 

5106 0202 



ADM 

TAG5.6 J 

5200 0202 



SUM 

TAG5 J 

5315 7000 



LMM 

70003,15B 1 

5410 0272 



STM 

T AG5+70B,T A&1-2 

5500 0342 



RAM 

1 

1403+1AG5,0 , 

5600 0173 



AOM 1 

-10B+TAG6 ! 

5712 0203 



SOM j 

! 

T AG6 » T AG 1 

! 


9.2.12 CENTRAL READ/WRITE INSTRUCTIONS 

(CYBER 170 SERIES, CYBER 70/MODELS 71, 72, 73, 74 OR 6000 SERIES) 

The CRD instruction transfers a 60-bit word from central memory to five consecutive PPU locations. The 
18-bit address of the central memory location must be loaded into A prior to executing this instruction. 

(Note that this is an absolute address.) The 60-bit word is disassembled into five 12-bit words beginning at 
the left. Location d receives the first 12-bit word. The remaining 12-bit words go to successive locations. 

The contents of A are not altered. I 

The CRM instruction reads a block of 60-bit words from central memory. The contents of location d give 
the block length. The 18-bit address of the first central word must be loaded into A prior to executing this 
instruction. (Note that this is an absolute address.) During the execution of the instruction, the contents 2 
of P go to processor address 0 and P holds m. Also, the block length (from d) goes to the Q register where I 
it is reduced by one as each central word is processed. The original content of P is restored at the end of 1 
the instruction. The new contents of P are fetched from word 0. If the read operation overwrote the | 

contents of word 0, the restored value of P will be different from the original contents. I 
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| The contents of A are incremented by one to provide the next central memory address after each 60-bit 
word is disassembled and stored. The contents of the Q register are also reduced by one. The block 
transfer is complete when (Q)=0. The block of central memory locations proceeds from address (A) to 
address (A)+(d)-l. The block of processor memory locations proceeds from address m to m+5(d)-l. 

Each central word is disassembled into five 12-bit words beginning with the high-order 12 bits. The 
first word is stored at processor memory location m. The content of P (which is holding m) is advanced 
by one to provide the next address in the processor memory as each 12-bit word is stored. If P overflows, 
operation continues as P is advanced from 7777 g to 0000 g . These locations will be written into as if 
they were consecutive. 

The CWD instruction assembles five successive 12-bit words into a 60-bit word and stores the word 
in central memory. The 18-bit address word designating the central memory location must be in A 
prior to execution of the instruction. (Note that this is an absolute address.) 

Location d holds the first word to be read out of the processor memory. This word appears as the 
higher order 12 bits of the 60-bit word to be stored in central memory. The remaining words are taken 
from successive addresses. 

The CWM instruction assembles a block of 60-bit words and writes them in central memory. The content 
of location d gives the number of 60-bit words. The content of the A register gives the beginning 
\ central memory address. (Note that this is an absolute address.) During the execution of this instruction 
(P) goes to processor address 0, and P holds m. Also, (d) goes to the Q register, where it is reduced 
by one as each central word is assembled. The original content of P is restored at the end of the 
instruction. 

The content of P (the m portion of the instruction) gives the address of the first word to be read out of 
the processor memory. This word appears as the higher order 12 bits of the first 60-bit word to be 
stored in central memory. 

The content of P is advanced by one to provide the next address in the processor memory as each 
12-bit word is read. If P overflows, operation continues as P is advanced from 7777g to OOOOg. 

These locations will be read from as if they were consecutive. 

(A) is advanced by one to provide the next central memory address after each 60-bit word is assembled. 
Also, Q is reduced by one. The block transfer is complete when (Q)=0. 


Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

CRD 

d 

Central read from (A) to d 

12 bits 

60d 

CRM 

m,d^ 

Central read (d) CM words beginning 
at CM ( A)-*PPU m 

24 bits 

61dm 

CWD 

d 

Central write from d to (A) 

12 bits 

62d 

CWM 

m.d 1 ^ 

Central write (d) words beginning 
at PPU m-CM (A) 

24 bits 

63dm 

f Expression d is required. 
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Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


11 

18 

1 30 

6016 



CRO 

15 P 

-(- 

6126 0012 



CRM 

TAG1 ,269 

1 

1 

6232 



CwO 

3?P 

1 

1 

6360 0012 



CWM 

TftCl ,500 

1 

1 


9.2.13 I/O BRANCH INSTRUCTIONS 

(CYBER 170 SERIES, CYBER 70/MODELS 71, 72, 73, 74, AND 6000 SERIES) 

The following instructions are conditional long jump instructions, each of which tests for a condition 
on channel d. When the condition is true, the jump to address m takes place. When the condition is 
not met, execution continues with the next instruction. The d expression is required. 


For the FJM instruction, an input channel is full when the input equipment has sent a word to the channel 
register and sets the full flag. The channel remains full until the PPU accepts the word and clears the 
flag. An output channel remains full when a PPU sends a word to the channel register and sets the 
full flag. The channel is empty when the output equipment accepts the word and notifies the PPU. 

Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

AJM 

m,d 

Jump to m if channel d active 

24 bits 

64dm 

IJM 

m,d 

Jump to m if channel d inactive 

24 bits 

65dm 

FJM 

m,d 

Jump to m if channel d full 

24 bits 

66dm 

EJM 

m, d 

Jump to m if channel d empty 

24 bits 

67dm 


Examples: 

Code Generated 

6402 0012 
65C 2 001’. 
6604 0026 
6704 0026 
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9.2.14 I/O BRANCH INSTRUCTIONS (CYBER 70/MODEL 76 AND 7600) 


The following instructions are conditional long jump instructions each of which tests a condition on 
channel d. When the condition is true, the jump to address m takes place. When the condition is not 
met, execution continues with the next instruction. These instructions are exclusively 7600 PPU 
instructions. The d expression is required. 


Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

FIM 

m,d 

Jump to m on channel d input word flag 

24 bits 

60dm 

EIM 

m,d 

Jump to m if no input word flag on channel d 

24 bits 

61dm 

IRM 

m,d 

Jump to m on channel d input record flag 

24 bits 

62dm 

NIM 

m,d 

Jump to m if no input record flag on 
channel d 

24 bits 

63dm 

FOM 

m, d 

Jump to m on channel d output word flag 

24 bits 

64dm 

EOM 

m,d 

Jump to m if no output word flag on 
channel d 

24 bits 

65dm 

ORM 

m,d 

Jump to m on channel d output record flag 

24 bits 

66dm 

NOM 

m,d 

Jump to m if no output record flag on 
channel d 

24 bits 

67 dm 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 


1 


11 

18 |30 

6005 176* 



FTM 

TAG6 *6 j 

61 n? 1^65 



FIM 

TA6G,? | 

b?<'l 1766 



IPM 

T AG6 »1 | 

4 


C Hf M 

SFT 

4 ! 

6 ? f! 4 



NTM 

TAG6,CHfiN | 

6415 7000 



FOM 

70Q0h,15B 1 

G^OO 1525 



EOM 

1 

lfcf?n*T 0 | 

6601 1266 



ORM 

1 

— 1 *3 PR+ T A G6 ♦ C MUM- S 

1 

6705 1366 



NOM 

T fl G6 ,C HA N+ 1 | 
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9.2.15 A REGISTER INPUT/OUTPUT INSTRUCTIONS 

The following instructions transfer a word to or from channel d and the lower 12 bits of the A register. 

On the CYBER 70/Model 76 or 7600, the IAN instruction is not executed until the input channel d word 
flag is set. If the flag is not set when the instruction is read, execution halts until an external signal 
sets the flag. The input channel d record flag does not affect the IAN execution. The IAN instruction 
clears the input channel d word flag and record flag and transmits a resume signal over the input cable 
after the word is entered in the A register. 

On the CYBER 70/Model 76 or 7600, the OAN instruction is not executed while the output channel d 
word flag is set. If the flag is set, execution stops until an external resume signal clears the flag. 
This instruction sets the output channel d word flag and transmits a work pulse over the output channel 
cable. 

On a CYBER 170 Series, CYBER 70/Model 71, 72, 73, or 74 or 6000 Series machine, executing 
either of these instructions when the channel is inactive causes the peripheral processor unit to become 
inoperative until some other peripheral processor activates the channel or the system is deadstarted. 

Formats: 


Operation 

Variable 

| Description 

1 Size 

Octal Code 

IAN 

d 

Input: channel d to A 

12 bits 

70d 

OAN 

d 

Output: (A) to channel d 

1 12 bits 

72d 


Examples: 

Code Generated 

7003 

7204 



LOCATION 

OPERATION 

VARIABLE 

COMMENTS 

1 


II 

18 

1 30 




l —---- 



I AN 

3 

1 



OAN 

CHAN 

1 

1 


9.2.16 BLOCK INPUT/OUTPUT INSTRUCTIONS 

The following instructions transfer a block of 12-bit words on channel d to or from a starting PPU memory 
location specified by m. The number of words transferred is specified by the contents of the A register 
which is reduced by one as each word is transferred. The operation is completed when (A)=0 or the channel 
becomes inactive (CYBER 170 Series, CYBER 70/Model 71, 72, 73, 74 or 6000 only). 

On a CYBER 170 Series, CYBER 70/Model 71, 72, 73, 74 or 6000 Series machine, the input operation is 
complete when the contents of A equal 0 or the data channel becomes inactive. If the operation is 
terminated by the channel becoming inactive, the next location in the processor memory is set to all 
zeros. The word count is not affected by this empty word. Therefore, the contents of the A register give 
the block length minus the number of real data words actually read in. 

During execution of either of these instructions, address 0000 temporarily holds P, while the P register 
holds m. The contents of P advance by one to give the address for the next word as each word is 
transferred. 

If a read operation overwrites word 0 (address 0000), the restored value of P may be different from the 
contents of P before the operation. 
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NOTE 


| If this instruction is executed on a CYBER 170 Series, 

CYBER 70/Model 71, 72, 73, or 74 or 6000 Series machine when 
the data channel is inactive, no operation is accomplished and 
the program continues at P + 2. However, the location specified 
by m is set to all zeros for the IAM instruction. 

On a CYBER 70/Model 76 or 7600, the IAM instruction is not executed until the input channel d word flag 
is set. If the flag is not set when the instruction is read, execution halts until an external signal sets the 
flag. The presence of an input channel d record flag is ignored for the first word of the block but 
terminates the block input at any word after the first. In this case, the next location in the PPU block 
input storage area contains a noise word; any remaining locations are unaltered. Note that the storage 
location can be incremented through location 7776g to 000s on a 7600 (or CYBER 70/Model 76), or 
| location 7777 through 0000 on a 6000 Series machine (or a CYBER 170 Series, CYBER 70/Model 71, 72, 73, 
or 74), which could destroy existing data or a program. 

On a CYBER 70/Model 76 or 7600, the OAM instruction is not executed until the output channel d word 
flag is cleared. If the flag is set when the instruction is read, execution halts until a resume pulse clears 
the flag. An output channel d record flag does not affect OAM execution. 


Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

IAM 

m,d t 

Input: (A) words to m from channel d 

24 bits 

71dm 

OAM 

m,d t 

Output: (A) words to channel d from m 

24 bits 

73dm 

tExpression d is required. 


Examples: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE COMMENTS 

7103 1364 

77P4 1364 

1 


>1 

18 130 



IAM 

OflM 

TAG,3 [ 

TAG, 4 | 


9.2.17 SET OUTPUT RECORD FLAG INSTRUCTION (CYBER 70/MODEL 76 AND 7600) 

The RFN instruction sets the output channel d record flag and transmits a record pulse over the cable. 
The instruction ignores the previous status of the channel d flags; the instruction is executed even if the 
output channel d record flag is set. 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

RFN 

d 

Set output record flag on channel d 

_ - ..-.- . ... - 

12 bits 

74d 
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Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


l 


M 

18 

1 30 





. . .. : -p -- : - - -- 

74 06 



PFN 

6 ! 


9.2.18 CHANNEL FUNCTION INSTRUCTIONS 

(CYBER 170 SERIES, CYBER 70/MODELS 71, 72, 73, 74, AND 6000 SERIES) 

The ACN instruction activates the channel specified by d. This instruction must precede the IAN, IAM, 
OAM, or OAN instructions. Activating a channel alerts the input/output equipment for the exchange of 
data. Activating an already active channel causes the PPU to become inoperative until another PPU or 
an external equipment deactivates the channel, or the system is deadstarted. 

The DCN instruction deactivates the channel specified by expression d. It stops the input/output 
equipment and terminates the buffer. Deactivating an already inactive channel causes the PPU to 
become inoperative until deadstart or until the channel is activated. Avoid disconnecting the 
channel before first sensing for channel empty, deactivating a channel before stopping the associated 
processor, or deactivating a channel before placing a useful program into the associated processor. 
After deadstart, PPUs wait on an input channel. Deactivating a channel after deadstart causes an 
exit to address 0001 and execution of the program. 

The FAN instruction sends the external function code from the lower 12 bits of the A register on 
channel d. 

The FNC instruction sends the external function code specified by m on channel d. For this instruction, 
expression d is required. 

Execution of a FAN or FNC instruction when the channel is active causes the PPU to become inoperative 
until another PPU or an external equipment deactivates the channel, or the system is deadstarted. 

Formats: 


Operation 

Variable 

Description 

Size 

Octal Code 

ACN 

d 

Activate channel d 

12 bits 

74d 

DCN 

d 

Disconnect channel d 

12 bits 

75d 

FAN 

d 

Function (A) on channel d 

12 bits 

76d 

FNC 

c, d 

Function c on channel d 

24 bits 

77dm 


Examples: 




LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


H 

18 

1 30 





- i. ..... 

7405 



ACN 

5 

n- 

1 

7504 



CCN 

CHAN 

i 

76C5 



FAN 

CHAN+1 

i 

i 

7705 0020 



FNC 

20 B * 5 

i 

i 
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9.2.19 ERROR STOP INSTRUCTION (CYBER 70/MODEL 76 AND 7600) 


The ESN instruction halts execution of the peripheral processor program and indicates a program 
error condition to the monitor control unit. The PPU must be restarted by a deadstart sequence from 
the MCU, only. 

Format: 


Operation 

Variable 

Description 

Size 

Octal Code 

ESN 

d 

Error Stop 

12 bits 

7700 


Example: 


Code Generated 


LOCATION 

OPERATION 

VARIABLE 

COMMENTS 


1 


11 

18 

1 30 

1 700 




-1 - 

i 
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PROGRAM EXECUTION 


10 


COMPASS can be called from the library and placed in execution through a COMPASS compiler call 
statement or through an IDENT statement (section 4.2.1) in a FORTRAN source deck. Ordinarily, when 
COMPASS is called through FORTRAN, the parameters specified on the statement apply also to COMPASS. 


10.1 CONTROL STATEMENTS 

Normally, assembly of COMPASS source programs or the execution of CPU binary object decks is done 
from a job file. A file is usually submitted in the form of card decks or card images. The first section of 
the file must contain the control statements described in this section. Other optional statements are 
described in the operating system reference manual. Following the control statement section are one or 
more sections containing source statements and data. 

A control statement begins with the first nonblank character. A comma or a left parenthesis or blank 
marks the beginning of a parameter string. Parameters in the string are separated by commas. A period or 
right parenthesis terminates a parameter string. Comments optionally follow the terminator. Within the 
parameter strings, blanks are ignored. Ordinarily, a parameter can contain only letters and digits. When a 
parameter is enclosed between dollar signs, all characters are permitted and blanks are not ignored. Within 
such a dollar-sign delimited parameter, two consecutive dollar signs represent a single dollar sign. 


10.1.1 JOB STATEMENT 

A job statement of the following format must be the first statement in the deck. The parameters following 
name can be in any order or can be omitted. For any omitted field, a default value is supplied which is an 
installation option. 

Format: 


name, Tt,E Clem. 


name 1 through 7 letters or digits by which the job is identified. 

The first character must be a letter. 

Tt CPU time limit in seconds (NOS/BE 1, SCOPE 2: 1 through 77777g; NOS 1: 1 through 
32760 |q). Must be sufficient to process all control statements for the job, including 
assembly and execution. 

EClcm (NOS/BE 1, SCOPE 2 only). Estimate of maximum amount of LCM or ECS in octal 
thousands, required for assembly or execution (1 through 1400g). 

COMPASS notes storage used in the job dayfile. For subsequent runs, the field lengths can be decreased 
accordingly. 
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Examples: 



10.1.2 COMPASS CALL STATEMENT 

The following statement causes the COMPASS assembler to be loaded from the library and executed. 
Parameters specify modes and files. 

Format: 

fCOMPASS(p ,p,...,p ) 
x ci n 

The optional parameters, p, may be in any order within the parentheses. A parameter can be omitted or 
can be in one of the following forms: 

mode 

mode=0 

mode=lfn 

| Mode is one or two characters as described below; lfn is a 1 through 7 character name of a file or a 
character string. 

Mode S ignificance 

A - Abort mode. 

A Abort job at end of run if any assembly errors occurred, 

omitted Do not abort job for assembly errors. 

B - Binary output. 

omitted or B Binary on the load-and-go file (LGO). 

B=0 No binary output. 

B=lfn Binary on the named file. 

BL - Burstable listing. Generates output listing easily separable into components: 

• Issues page ejects between load map, source code, and cross reference 
map. 

• Assures an even number of pages (page parity) for each program unit 
listing, issuing a blank page at end if necessary. 

omitted or BL=0 Generates listings in compact format. Page ejects issued only before new 
subprograms. 
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Mode 


Significance 


D - Debug mode. 

D Binary is generated on the file indicated by B parameter in spite of assembly 

errors and regardless of the abort mode (A parameter). The A parameter is 
ignored when the D parameter is selected. 

D is ignored if B=0. 

omitted Assembly errors inhibit binary output. In abort mode (A parameter present), 

no binary output is written at all for a subprogram containing assembly errors. 
Otherwise (A parameter omitted), the message ERRORS IN ASSEMBLY is 
written to the file indicated by the B parameter for each subprogram 
containing assembly errors. 

E - Error list. Suppressed if full list is directed to the same file or if no assembly errors occur. 

However, if the full list and error list are on different files (for example, the full list is written to 
OUTPUT and the error list is written on the named file), the error list will contain all statements 
having error flags. If an error line was generated by a macro call, the macro call can also appear in 
the error list. Specification of both the E and the O parameter results in a control statement error. 

omitted Error list on file OUTPUT. 


F - 


E 

E=lfn 

E=0 


FORTRAN mode, 
omitted or F 
F=number 
F=name 


Error list on file ERRS. 

Error list on named file. 

No error list is generated (equivalent to directing error list to the same file as 
full list). 

Establishes value of special element *F. 

*F is 0. 

*F is number (one decimal digit). 

*F is a number corresponding to name as follows: 


COMPASS = 0 
RUN = 1 
FTN = 2 


G - 


Get system text, 
omitted or G=0 
G 

G=lfn 

G=lfn/ovl 


Load no system text from a sequential binary file. 

Load the first system text overlay, if any, from file named SYSTEXT. 

Load the first system text overlay, if any, in the specified sequential binary 
file. 

Search the specified sequential binary file for a system text overlay whose 
name is ovl and load the first such overlay. 
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Mode 


Significance 


I - Source of assembler input. 


omitted 


Source deck is on INPUT file. 


I 

1=0 

I=lfn 

L - Full list. 

omitted or L 


Source deck is on COMPILE file in either compressed or expanded format. 
Illegal. 

Source deck is on named file. 

List output on OUTPUT file. 


L=lfn List output on named file. When the full list is on a different file than the 

short list, the listing for each subprogram is a separate section beginning with 
a one-word header consisting of an asterisk and the first six characters of the 
subprogram name. This header identifies the subprogram as a convenience for 
sorting and cataloging. For ease in bursting listings between subprograms, a 
blank page will be used, if necessary, to ensure an even number of pages per 
subprogram. Also see 0 option. 

L=0 No full list will be generated. 


LO - List options. Selects or deselects a maximum of nine of the list options A, B, C, D, E, F, G, L, M, N, 
R, S, T, or X. 


omitted or LO=0 


Same as selecting B, L, N, and R only. 


LO 

LO=ciC2—c n 


LO=$$$$ 


Selects list options C, F, G, and X, and deselects R. 

A list of up to nine characters. Inclusion of B, L, N, or R deselects the 
corresponding option. Otherwise, inclusion of a character selects the option. 
For options, refer to LIST pseudo instruction, section 4.11.1. 

Selects all list options. 


ML - Initial Value of MODLEVEL Micro. 


omitted or ML MODLEVEL is defined equal to JDATE at the start of each assembly. 

ML=string MODLEVEL is defined as string (nine characters maximum) at the start of 

each assembly. 

N - No eject. This parameter has been obsoleted by the BL parameter. 

0 - Short list. Suppressed if full list is directed to the same file or if no assembly errors occur. 

However, if the full list and short list are on different files (for example, the full list is written on 
OUTPUT and the short list is written on the named file), the short list will contain all statements 
having error flags. If an error line was generated by a macro call, the macro call may also be in the 
short list. Specification of both the O parameter and the E parameter results in a control statement 
error. 


omitted or O 
0=lfn 
0=0 


List output on OUTPUT file. 

List output on named file. 

No short list will be generated (equivalent to directing short list to the same 
file as full list). 
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Mode 


Significance 


P - Continue page. 


P Page numbering continues from subprogram to subprogram, 

omitted Page numbering begins with 1 at the start of each subprogram. 

PC - Initial Value of PCOMMENT Micro. 

omitted or PC PCOMMENT is defined as 30 blanks at the start of each assembly. 

PC=string PCOMMENT is defined as string at the start of each assembly. Characters are 

truncated from the right or blanks are appended to the right, as necessary, so 
that the length of the micro value is exactly 30 characters. 

PD - Print Density. Print density of six is assumed upon entry. Listing control is changed only when print 
density of 8 is requested, then returned to 6 when finished. 

PD=6 Print density is six lines per inch. 

PD=8 or PD Pring density is eight lines per inch. 

PD=other or Print density defaults to IP.PD lines per inch, 

omitted 

PS - Page Size. 


PS=x 


Page size is x lines per page. Acceptable values of x are 4 <x<99. 


PS=other or 
omitted 

System Text Name, 
omitted 

S=0 

S 

S=ovl 

S=lib/ovl 


If PD is not specified, page size defaults to IP.PS lines per page. If PD is 
specified, page size defaults to PS=(PD*IP.PS)/IP.PD. 


If there are no G parameters other than G=0, load the overlay named 
SYSTEXT from the job's current global library set. 

Load no system text from a library. 

Load system text overlay named SYSTEXT from job's current global library set. 

Load the system text overlay named ovl from the job's current global library 
set. 

Load the system text overlay named ovl from the library named lib, which may 
be a user library file or a system library. 


Overlay residence in user libraries is not currently supported by NOS. 
Source of external text (XTEXT) when location field of XTEXT pseudo instruction is blank, 
omitted External text OLDPL file. 

X=lfn External text on named file. 

X=0 Illegal. 

X External text on OPL file. 
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Examples: 


COMPASS(B,D, S=OVI) 


I COMPASS(LO=ASGXD) 


A COMPASS. 


Reads source from INPUT, writes the binary output to LGO, 
and the listing to OUTPUT. Assemble in debug mode with 
system text from overlay OVI in the global library set. 

Disables LIST pseudo instruction and sets LIST options 
A, S, G, X, and D. 

Uses the standard default options. 


MULTIPLE SYSTEM TEXT OVERLAYS 

COMPASS 3 allows up to seven system text overlays to be used for an assembler run. They are specified by 
G and S parameters on the COMPASS control statement. Each G parameter (except G=0) specifies loading 
of a system text overlay from a sequential binary file, and each S parameter (except S=0) specifies loading 
of a system text overlay from a user library file or a system library. The G and S parameters can be used 
in any combination and in any order, and can be intermixed freely with other parameters, provided the 
total number of system text overlays specified does not exceed seven. COMPASS loads the system text 
overlays in the order in which the G and S parameters occur on the COMPASS statement. If a system 
macro, micro, or symbol is defined by more than one system text, only the last definition is used. S=0 has 
no effect if there are any other S or G parameters. 

Examples: 


6 


COM PASS (I 


, S, S=PFMTEXT, G=MYTEXT) 


Reads source from file COMPILE and gets system 
text from overlays SYSTEXT and PFMTEXT in the 
global library set, and from the local file MYTEXT. 


/ Get system text from overlay SCPTEXT 

COMPASS(G=FILE/SCPTEXT,S=MYLIB/TEXT) on the file FILE> and from over lay TEXT 

in library MYLIB. 


10.1.3 LGO CONTROL STATEMENT 

An LGO control statement calls for the loading and execution of CPU binary output produced by the 
assembler unless the B option on the COMPASS control statement is set to 0 or to some other file name. 
When binary output is on some file other than LGO, the statement is replaced by a program call statement 
for that file. The file is automatically rewound before loading. The LGO file is temporary; it is released 
at job termination. 

Formats: 


j LGO (p ^, Pjj »• • • j 


P n> 


or 


LGO. 


10.1.4 PROGRAM CALL STATEMENT 

_ The program call statement directs the operating system to search for a file or CPU program that has the 
I specified name, load it into central memory (CM or SCM), and execute it as a CPU program. 
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Formats: 


A name(p 1 ,p 2 ,...,p n ) 

/]name. 

name Program name. 

Pj Parameters in a format acceptable to the program being called. 

When the operating system locates the file, it rewinds and loads the file. When loading is complete, it 
executes the program as a CPU program. 


10.1.5 7/8/9 CARD 

A card with rows 7, 8, and 9 punched in column one separates sections in the job deck. The level is 
assumed zero unless columns 2 and 3 contain an octal level number punched in Hollerith code. The 
remaining columns optionally contain comments. 

As an example, a deck consisting of a control statement section and a COMPASS source input section 
would include two 7/8/9 cards. The first terminates the control statements and the second terminates 
COMPASS input. A 7/8/9 card of level 17 is interpreted by the operating system as a 6/7/8/9 card. 


10.1.6 6/7/8/9 CARD 

A card with rows 6, 7, 8, and 9 punched in column one signals the end of the job deck. Columns 2 through 
80 optionally contain comments. 


10.1.7 USER CONTROL STATEMENT (NOS 1 ONLY) 

The user control statement format is: 

jiUSER, usernam, passwrd, famname. 

usernam User number or name 

passwrd User password 

famname Name of user permanent file device family name 


The USER statement, required by NOS 1, follows the job control statement and specifies user access 
information. The user name is used in system bookkeeping and defines the user's file catalog area. The 
user can specify a different permanent file catalog during job processing by issuing another USER control 
statement. 
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10.2 SAMPLE DECKS 


The following job calls for assembly of the source program and execution of the binary object program 
produced by the assembly. The USER control statement (for NOS 1 only) provides required user access 
information. COMPASS reads source statements from file INPUT, writes the listing on OUTPUT, and 
writes a binary object deck on file LGO. Control statement LGO calls for execution of the binary object 
program, which obtains its data from file INPUT. 
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In the following job, the COMPASS assembler is called twice. During the first assembly, binary object 
decks for subprograms TEST1 and TEST2 are written on file LGFILE1. The source decks for these 
subprograms are in the second section of the INPUT file. During the second assembly, COMPASS writes a 
binary object deck for subprogram CD A on file LGFILE2. Each assembler run produces a full listing. 
Following the second assembly, LGFILE2 is repositioned to the beginning of the file. Then, the COPYBR 
program is called to copy the contents of LGFILE2 to a punch file (PUNCHB). The LGFILE1 statement 
then calls for the loading and execution of subprograms TEST1 and TEST2 from LGFILE1. Following 
successful execution of the subprograms, the file is rewound and copied to the punch file, after which the 
job terminates. 
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In the following example, the ID ENT statement causes FTN to call COMPASS to process the COMPASS 
source deck. If the COMPASS END statement is not followed by another IDENT statement, then 
COMPASS returns control to the compiler that called it. 



The following sample programs illustrate how to assemble and use a system text overlay. 



I DENT 

MY TEXT 


STt XT 


ONE 

HALF 

fcuu 

ttJU 

1 constant one 

JU POs constant 

SH I F T 

MACRO 

ALPHA » HE TA POSITIONING MACRO 


I Ft 

SAP 

NE « » A L PH A $ X P $ » 1 

ALPHA 


IF C 

StSP 

ME * SBt. T a 482* « 1 

HE! A 


LX6 

XP»bP 


t MOM 



END 
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I DENT 

TEST 




ENTRY 

SST 

TEST 


6110000001 

TEST 

Sbl 

ONE 

constant one from TEXT 

512GOO0OO4 ♦ 


SA2 

INBUF 

PICK UP VALUE FROM STORAGE 

6120U000Jb 


SHIFT 

X2»HALF 

POSITION WORD IN X6 

5160000006 ♦ 


SA6 

OUTtJUF 

RETURN NEW WORD TO STORAGE 

7 1602** 7 02l 


ENOKUN 



2 

INSuF 

ass 

2 


1 

OUTfctUF 

BSS 

1 




END 

TEST 



The deck for this job could be set up as follows: 



f6 

7 


8 ^- 

— 

9 i 


( IDENT TEST 


(l 



8 

9 


IDENT MYTEXT 


7 

8 - \ - 

9 ( COMPASS (G=MYTEXT,S) 


^ CO MP ASS (S=0,B= MYTEXT) 
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LISTING FORMAT 


11 


This section describes assembly listing format. Control of the contents of the listing is described in 
section 4.11 Listing Control, and in section 10.1. 2 COMPASS Call Statement. 


11.1 PAGE HEADING 

Each page of the assembly listing contains a title line and a subtitle line in the following format: 


title 

COMPASS Version 

date 

time 

PAGE x 

subtitle 

sub-sub 
title 

block 

name 

symbol 

qual 



title 


date 


Up to 62 characters taken from the first TITLE pseudo instruction or from a 
TTL pseudo instruction or, in lieu of these, from the IDENT instruction 

Date of assembly 


time 
PAGE x 

subtitle 

sub-subtitle 


block name 
symbol qual 


Time of assembly in hours, minutes and seconds 

Page number of listing. Pagination begins with 1 for each END instruction 
unless the P option is selected on the COMPASS control statement 

Up to 62 characters taken from second and subsequent TITLE pseudo 
instructions or a CTEXT pseudo instruction 

Up to 10 characters taken from the most recent EJECT, SPACE, TITLE, or 
TTL pseudo instruction or the location field of an ES or PS machine instruction. 
If the instruction that introduces the new sub-subtitle also causes a page eject, 
the instruction immediately follows the heading (assuming the C list option is 
also selected). 

Name of the block in use at beginning of page 
Qualifier in use (see QUAL pseudo instruction) 


11.2 HEADER INFORMATION 

The first page of the assembly listing for each subprogram contains a summary of binary control cards 
(optional), a list of all the blocks established for the subprogram, and lists of entry points and 
external symbols. 


11.2.1 BINARY CONTROL CARD SUMMARY 

A binary control card summary in the following format is generated for each IDENT instruction when the 
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COMPASS control statement or the LIST instruction selects the B list option: 
ADDRESS LENGTH BINARY CONTROL CARDS 

addr^ binary card^ 

addr 2 f 2 binary cardg 


addr n 

eop 


f Q binary card Q 

(feop) END card or blank 


binary card. The binary card that caused generation of the binary for the overlay, partial 

1 binary, or subprogram. The list includes SEG, SEGMENT, and IDENT instruc¬ 

tions. 

addr. The central memory or peripheral processor memory origin address for the 

subprogram, overlay, or partial binary written out as a result of the binary 
card. 

f. The octal length of the subprogram, overlay or partial binary, in central 

memory words for a central processor assembly, or in peripheral processor 
words for a peripheral processor assembly. 

eop The octal central memory or peripheral processor address for the end of the 

program unit begun by the previous IDENT. 

feop The octal length in central memory words of a peripheral assembly; not present 

in a listing of a central processor assembly. 


Examples: 


address 

LENGTH 

BINARY 

CONTROL CA C DS. 

101 

271 

IDENT 

COMPASS,LOVER,CMP 

372 

5241 

SEG 


5633 

1242 

SEG 


7075 

4145 

SEG 


13242 

5175 

SEG 


20437 

1352 

SEG 


22011 


END 

COMPASS 


ADDRESS 

LENGTH 

binary 

CONTROL CARDS. 

0 

7761 

IDtNT 

DSD , 0 

7761 

(14b2> 
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11.2.2 BLOCK USAGE SUMMARY 


A block usage summary of the following format is generated in the assembly listing under control of the 
B list option: 


BLOCKS TYPE 


ADDRESS 


LENGTH 


name^ 

V 

baddrj 

name 

& 

t 2 

baddr 2 


bi 

bSL 


name 

n 

name. 

i 


type 


baddr. 

L 

length. 

Examples: 


t baddr bi 

n n n 

Name of the block used in the subprogram, as follows: 

PROGRAM* For a relocatable assembly, indicates the zero block. For an 
absolute assembly, the first PROGRAM* indicates the absolute 
block, the second indicates the default symbols block. 

ABSOLUTE* Appears in a relocatable assembly only and indicates the use 
of an absolute block. 

LITERALS* Identifies the literals block. 

other Identifies a local, labeled common, or blank common block. 

The type of the block as follows: 

ABSOLUTE All addresses in the block are relative to absolute zero. For 
an absolute asembly, all blocks are ABSOLUTE. 

+LOCAL Addresses in the block are relative to the origin assigned to 

block zero. The + is present for an ECS/LCM block. 

+COMMON Addresses in the block are relative to the origin of the common 
block. The + is present for an ECS/LCM block. 

Beginning address of the block according to type. 

Number of words in the block. 


BLOCKS 

TYPF 

OPPRESS 

length 

PROGRAM* 

ABSOLUTE 

0 

5416 

LI T ERALS* 

ARSOLUTF 

5416 

215 

CONTROL 

ABSOLUTE 

5673 

1242 

PSCUDO 

ABSOLUTE 

7075 

4145 

SUBS 

ABSOLUT^ 

1 3242 

5175 

BUFFERS 

ABSOLUT^ 

20437 

11140 
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BLOCKS 

TYPE 

ADDRESS 

LENGTH 

ABSOLUTE* 

ABSOLUTE 

0 

62 

PROGRAM* 

LOCAL 

0 

35 

DATA! 

LOCAL 

35 

1 

LCM 

+L0CAL 

0 

5 

TABLE 

+LQCAL 

5 

5 

TABLE 

+C0MM0N 

0 

123 

TABLE 

LOCAL 

36 

1 

TABLE 

COMMON 

0 

1 

// 

COMMON 

0 

10 0 0 


11.2.3 ENTRY POINT LIST 

If the subprogram declares entry points, a list of entry point symbols in the following format follows the 
block usage summary. 

ENTRY POINTS. 

sym 1 *+addr 1 +block 1 sym n+1 *+addr n+1 +block n+1 s y m 2n+l* +addr 2n+l~* lock 2n+l 
sym 2 *+addr 2 +block 2 sym^+addr^+block^ sym^^+addr^+bloek^ 


sym *+addr +block sym_ *+addr +block„ 
n n n ■ 


sym 3n *+addr 3n +block 3n 


Where n is one-third the number of entry points. The asterisk to the right of sym. is present if sym. is a 
conditional entry point (declared by ENTRYC). The + to the left of addr. is present if block, is an E(3 s/LCM 
block. The + to the right of addr. is present if addr is relocatable. Block, is blank or a common block 
name surrounded by slashes. 1 

If the symbol is undefined, addr. is *******. 

Example: 

ENTRY POINTS. 


SNAP1 

1345 + 

CALL 

72 + 

REORDER 

23 r 7 5 + 

SNAP2 

1352 + 

GOTO 

156 + 

RPF 

2461+ 

SNAP3 

1357 + 

IF 

224 + 

RPH 

2463+ 

JUMPVEC * 

0 +/JUMPVEC/ 

LABEL 

372 + 

LCM + 

0 + 

BEGIN 

0 + 

READ 

435 + 

LCMR *+ 

1 0 + /LCM a/ 

BYTESIZ 

6 

RECORD 

24+/DAT A/ 




11.2.4 EXTERNAL SYMBOL LIST 

If external symbol references are declared in the subprogram, a list of the following format follows the 
list of entry point symbols: 

EXTERNAL SYMBOLS. 


symj 

sym n+i 

sym 2n+l 

Sym 3n+1 ’ ' • 

sym 7n+l 

s ym 2 

sym n+2 
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Where n is one-eighth the number of external symbols. If a symbol is a weak external it is 
followed by an asterisk. 


Example. 


rxTFRNPL SYMPOLP. 

Pf'NFXT T vncroT SYMBOL POGOTO ppr 


11.3 OCTAL AND SOURCE STATEMENT LISTING 

The contents of the octal and source statement listing depends on the options selected. 
The list is 130 characters wide with fields assigned as shown in figure 11-1. 


Title Line 


Subtitle Line 



Figure 11-1. Format of Octal and Source Statement Listing 
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Error Flags 


Location 

Addresses 


Octal Code 


Error flags indicating that errors of the type indicated have been detected on the 
source line or in a subsequent statement that is not listed. These flags are 
described more fully under Error Directory. Lines containing errors are always 
listed. 


The value of the location counter with leading zeros suppressed. If no code is 
generated or no location symbol is defined by the statement, this field is blank. 

If at the time the value is assigned, the value of the location counter differs from 
the value of the origin counter, an L precedes the address. 

The actual code generated by this statement. Depending on options selected, the 
listing shows just the first word or all words generated for data generation 
instructions. The field does not include NO instructions (46000g) packed for a 
force upper or zeros packed for a completed parcel on a VFD. A 24-bit PPU 
instruction is shown two words of data per line. 

If the word contains an address, the octal code is flagged as follows: 

Negative relocatable address 
+ Positive relocatable address 
C Common relocatable address 
X External address 


For a statement that does not generate code, this field is normally blank. 
Exceptions are as follows: 

For a LIT instruction the field contains the address of the first word of 
the literals generated. 

For a COL instruction, the field contains the new beginning-of-comments 
column number. 

For a symbol defined through SET, MAX, MIN, EQU, =, or MICCNT, 
this field contains the octal value of the symbol right justified with leading 
zeros suppressed. / 

For an instruction resulting in a change of base, the notation bjr*b 2 is right 
justified in the field, b^ indicates the old base and indicates the new base. 

For an instruction resulting in a change of code conversion, the notation 
Cji—*c 2 is right justified in the field. Cj indicates the old code and c 2 
indicates the new code. 

For a DUP instruction, the field contains the repeat count. 

For a BSS or BSSZ instruction, the field contains the octal value of the word 
count right justified with leading zeros suppressed. If the word count is 
zero the field is blank. 

For a DECMIC or OCTMIC instruction, the field contains the octal value of 
the expression right justified with leading zeros suppressed. 
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Source Code Source statement image (columns 1 through 72) 

Sequence Columns 73 through 90 of the card image or an identifier for an expansion of a 

definition operation as follows: 


Macro 

Remote code 
Duplicated code 
Echoed code 
XTEXT 
OPDEF 


macro name 
*RMT* 

*DUP* 

♦ECHO* 
file name 

Operation field of opdef call, such as SB1 


The recursion level is indicated in the right half of the field. 


Example: 


COMPASS 

3.71210 - CYBER 70/ COMPREHENSIVE 

ASSEMBLER. 

COMPASS 3.71210 06/20/71 16.25.44. 

PAGF 

92 

COMMON 

AND UTILITY SUBROUTINES. 




ALC 



*» 

ALC - 

TABLE MANAGER ANO ALLOCATOR. 

C0M°ASS 

1645 



* 

ALLOCATOR MILL MOVE TABLES TO ACQUIRE ROOM. ALSO MAY DUMP 

COMPASS 

1656 



* 

INTERMEDIATE OR CROSS-R£FE 9 ENCfS ONTO SCRATCH FILE. 

COMPASS 

1647 



• 

ENTRY 

(A3) * TABLE INDEX. 

COMPASS 

1648 



• 


<X1> = CHANGE C* OR -) TO TABLE SI7E. 

COMPASS 

1655 



* 

EXIT 

(X2) = ORIGIN OF TABLE. 

COMPASS 

17.C 



* 


(X3) = NEW 

LENGTH OF TABLE. 

COMPASS 

1 ?» 1 







COMPASS 

17:2 







COMPASS 

17,3 

5466 

5020003462 

ALCX 

SA2 

ORIGINS*AC 

RECLAIM VALUES FOR EXIT REPLY 

COMPASS 

17 4 


5030003516 


SAT 

SIZES*A3 


COMPASS 

17.5 







COMPASS 

17. 6 

5467 

0000000000 

ALC 

PS 


RETURN EXIT 

COMPASS 

17 7 

5470 

6120000034 

ALCl 

S32 

NTABLES 

P°ESET INDEX REGISTERS 

COMPASS 

17.8 


5020003462 


S A? 

ORIGINS*A0 

CURRENT ORIGIN 

COM 3 AS 5 

1 T . 4 

5471 

54322 


SA3 

A2*32 

CURRENT LENGTH 

COM! AS' 

in; 


54421 


SA4 

A2*Bt 

NEXT TABLE ORIGIN 

COMPASS 

1711 


36613 


1X6 

XI *X3 

NEW ST7E 

COM** A5 r 

171 2 


37042 


1X6 

X4-X2 

TEST IF ROOM FOR rvPAMSIQN 

COM"OSS 

1 '13 

5472 

37006 


IXj 

XQ-X6 


com.- a: : 

1/! 4 


3330005474 


NS 

Xij, ALC2 

JUMP TO Rt-ALLOCATE CORE 

COM'OSS 

1715 


5463 0 


SA5 

A3 

STORE NSW SIZE 

COMPASS 

1 716 

5473 

0400605466 


ET 

ALCX 

EXIT 

COMPASS 

17! 7 







COM-'AS' < * 

1718 



• 

MOVE 

TA9LFS. 


COMPASS 

1 71® 







COMPASt 

17.?: 

5474 

5123003172 

ALC2 

SA? 

SIZCORE 

SEE TF ENOUGH POOH 

COMPASS 

1721 


10411 


BX4 

XI 


COM ’ASS 

1722 


67721 


S37 

82-11 


CO«PAS r 

17’3 

5475 

67771 

ALC3 

S37 

B7-B1 


C T**r OS " 

1”<i 


5157003516 


SA5 

SI7ES*B7 


comp ass 

1 7.25 


36445 


1X4 

X4 *X5 


C'j“ ;;- A-iS 

17?* 

5476 

0573005475 


HZ 

B?,ALC3 

LOOP 

COMPASS 

1 7?7 


5130003345 


SA3 

PASS 


COMPASS 

17.'d 

5477 

63730 


S \r 

X3 


COM >ass 

1 7 25 


37024 


1X3 

X2-X4 


COMPASS 

1 735 

-—i ■ 

63440 

—*M3a 0 05535 — 

—__ 

SI 4 
SB? 

X4 

(54) =^TOTAL^LENGTH 

FOMPASS 

1 7 Jl 


11.4 LITERALS 

When the D list option has been selected, the assembly listing includes a listing of the literals block 
following the default symbols listing. Following each literal address are the octal contents of the word and 
a display code conversion of the contents of the word. 
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Examples: 


CONTENT OF LITERALS BLOCK. 


010121 

174 c; 57 73 753 000000000 

0+.>>X 

01012? 

16650000000000000000 

Ni* 

01012? 

15052327010705553636 

MESSAGE 33 

010124 

55040503111501145522 

DECIMAL R 

010125 

05212511220504570000 

EOUIRED. 

010126 

55220521251122050400 

REQUIRED 

01012? 

oooooooooooooooooooo 


010130 

20221707220115550102 

PROGRAM A8 

010131 

17222457000000000000 

DRT. 


CONTENT OF LITERALS BLOCK. 

7315 

0 0 34 

1 

7316 

7070 


7317 

oon7 

G 

7320 

0000 


7321 

5501 

A 

732? 

0000 


7323 

0506 

EF 

7324 

1411 

LI 

7325 

2405 

TE 

7326 

2201 

RA 

7327 

14?3 

LS 

DEFAULT 

SYMBOLS 



When the D list option is selected, a list of default symbols immediately precedes the literals block. 


Example: 


DEFAULT SYMBOLS DEFINED BY COMPASS 


000000 X MSG* 

005461 Tfl Gl 

00546? TAG2 

005467 AFC 

005464 S*M 


11.6 ASSEMBLER STATISTICS 

Assembler statistics are printed at the end of the octal and source statement listing or, if the D list option 
is selected, following the default symbols. Information includes the following: 

• Amount of storage used (octal) 

• Number of source statements 

• Number of symbols defined 

• Number of invented symbols 

• Number of symbol references 

| • CPU type in which COMPASS executed and assembly time 

• Number of errors encountered during assembly 

• Number of lost references, that is, references to symbols that have been omitted from the symbolic 
reference table 
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11.7 ERROR DIRECTORY 


The assembly listing includes an error directory if any errors are detected during assembly. The 
directory begins a new page identified with the subtitle ERROR DIRECTORY. Each type of error that 
occurred is called out with a two-line message of the following format: 

x TYPE ERROR description 

OCCURRED ON PAGES P r p^, , ... P n 


Types and descriptions are given in Tables 11-1 and 11-2. Errors flagged with an alphabetic character 
are fatal. A fatal error causes suppression of binary output. Nonfatal warning flags are num eric; they 
are informative only. 

TABLE 11-1. FATAL ERRORS 


Type 

Message 

Significance 

Action 

A 

ADDRESS FIELD 
BAD. 

An error exists in a variable subfield 
entry. The following is a list of 
possible errors: 

The CODE character is hot A, D, E, I, 

O, or *. 

The symbol or name is greater than 8 
characters. 

The expression does not reduce to one 
external term. 

The relocatable terms do not cancel 
properly. 

The instruction requires an absolute 
expression. 

The instruction disallows register 
designators. 

A data error; 8 or 9 is encountered in 
octal data and the modifier is not S, 

P, 0, E, D, or B. 

No data is found in the variable field 
of a LIT instruction. 

No symbol is following an =S, =X, or 
=Y prefix. 

The relative jump is out of range 
(-31>r>31) on a PPU instruction. 

The BASE character is not 0, M, D, 
or *. 

Refer to the 
manual for the 
correct address 
field format 
for the opera¬ 
tion code 
specified. 
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TABLE 11-1. FATAL ERRORS (Contd) 


Type 

Message 

Significance 

Action 

A 

ADDRESS FIELD 
BAD. (Contd) 

A register is illegal in a CON 
instruction. 

A synonymous instruction for OPSYN or 
CPSYN cannot be located. 

The micro count is less than zero or 
greater than ten. 

The NOLABEL character is not I. 

A negative relocation is specified on 
ORG or ORGC. 

The POS value is less than 0 or 
greater than word size. 

The OPDEF reference is erroneous. 

No comma is following the DIS word 
count. 

An illegal entry is in the variable 
field of IDENT. 


D 

DOUBLY 

DEFINED 

SYMBOL. 

THE FIRST 
DEFINITION 
HOLDS. 

A symbol has been previously defined 
or declared external. 

Rename the 
duplicate 
symbol in the 
program. 

E 

ECHO, DUP, 

RMT, OR 

MACRO 

ILLEGALLY 
NESTED. 

The definition of ECHO, DUP, RMT, or 
MACRO is not entirely within the next 
outer definition. 

Correct the 
program. 

F 

NUMBER OF 

ENTRIES 

EXCEEDS 

PERMISSIBLE 

AMOUNT. 

One of the following error conditions 
exists: 

LIT generates more than 100 words. 

Data is missing or erroneous on XTEXT 
file. 

More than 63 formal parameters and 
local names are in a macro definition. 

There are more than 255 blocks. 

There are more than 511 external 
symbols. 

Correct error 
condition and 
rerun the job. 
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TABLE 11-1. FATAL ERRORS (Cont'd) 


Type 

Message 

Significance 

Action 

U 

UNDEFINED 

There is a reference to a symbol that is not defined; 

Define the 


SYMBOL. 

VALUE ASSUMED 0. 

for example, an IF statement line count, a DIS word 
count, an unrecognizable attribute on an IF state¬ 
ment, or an undefined qualifier. 

symbol. 

V 

BIT COUNT ERROR 
ON VFD (MUST BE 

0 < COUNT < 60). 

The VFD field size is erroneous. 

Correct the 
size of the 

VFD field. 


11.8 SYMBOLIC REFERENCE TABLE 

The assembler generates a symbolic reference table (figure 11-2) if the L list option is on at the end of 
assembly. The table is not complete if the option was turned off at any time during the assembly. The 
table lists symbols according to the qualifier, if any, under which they were defined. The global 
symbols are listed first. A new heading of the following form introduces each new list of qualified 
symbols. 

SYMBOL QUALIFIER = qualifier 

The qualifiers are in the order declared in the subprogram. Symbols are listed alphabetically. 

When symbol references are lost because table space has been exceeded, the subtitle line includes 
notification in the form n LOST REFERENCES. 
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TABLE 11-2. INFORMATIVE ERRORS 


Type 

Message 

Significance 

Action 

1 

LOCATION SYMBOL 
BAD. 

SYMBOL NOT 
DEFINED. 

The location field entry is erroneous. The instruc¬ 
tion does not require an entry. 

Define or 
eliminate the 
symbol in the 
location field. 

2 

ADDRESS ERROR 

ON SYMBOL 
DEFINITION. 

The variable field entry is erroneous. The location 
field symbol is not defined. 

Correct the 

symbol 

definition. 

3 

DUPLICATE MACRO 
DEFINITION. NEW 

ONE OVERRIDES. 

The macro, opdef, or synonymous operation 
redefines the operation code. 

Rename the 
duplicate 
macro name. 

4 

BAD FORMAL 
PARAMETER NAME 
IGNORED. 

The macro or ECHO formal parameter name is 
repeated or illegal. 

Correct the 
formal 
parameter 
name. 

5 

CPU OPERATION 
SYNTAX INCOR¬ 
RECTLY SPECIFIED. 

The OPDEF, CPOP, CPSYN, or PURGDEF specifies 
an illegal syntax. 

Correct the 
syntax of the 
pseudo 
instruction. 

6 

LOCATION FIELD 
MEANINGLESS. 

The entry in the location field is erroneous; it is 
ignored. 

Correct the 

location 

field. 

7 

ADDRESS VALUE 
EXCEEDS FIELD 

SIZE, RESULT 
TRUNCATED. 

The value of the address is erroneous; one of the 
following conditions exists: 

The value of the expression exceeds the size of the 
destination field. 

Check the 
possible 
values of the 
variable 
subfield. 



The BSS address expression value is negative. 




The MICRO starting character position or charac¬ 
ter count is negative. 


8 

MISSING OR EXTRA 
ADDRESS SUBFIELD. 

The variable subfield entry is missing or superfluous. 

Correct the 

variable 

subfield. 

9 

MICRO SUBSTITU¬ 
TION ERROR. NO 
SUBSTITUTION. 

The micro reference is unrecognizable. 

Correct the 

micro 

reference. 
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The qualifiers are in the order declared in the subprogram. Symbols are listed alphabetically. 

When symbol references are lost because table space has been exceeded, the subtitle line includes 
notification in the form n LOST REFERENCES. 

Format 1 reflects the XREF P effect; P is the default for the XREF pseudo instruction. Formats 2 and 3 
reflect the effects of XREF B and XREF A, respectively. 


Title Line 


SYMBOLIC REFERENCE TABLE. 


_HZ_ 


Format 1 1 

symbol 

XREF P): 

value 

block 

page/line 

bo 

£ 

_ 

page/line 

flag 

page/line 

\ 

I ' 

^page/line 

bfl 

£ 

page/line 

bp 

A 

<■-1 


Format 2 

XREF B): 



bfi 



bD 

1 


bp 

symbol 

value 

block 

page/line 

c~~ 

address,- 

page/line 

2 

/ /address, 


cti 


Format 3 (XREF A): 


symbol 


value 


block 


address, 


address, 


address, 


address, 


address, 


Figure 11-2. Format of Symbolic Reference Table 


symbol Alphabetical list of symbols defined under the qualifier. 

value Absolute value of the symbol or the address assigned to this symbol relative to 

the block named. 


block 


page/line 


address 


If the symbol was defined by the SST pseudo instruction, block is the system 
text file or overlay name. Otherwise, this field is blank in an absolute assembly 
or, in a relocatable assembly, it contains the name of the block containing the 
symbol. 

From left to right and from top to bottom, a list of indices sequenced according 
to page number. Each index points to a statement containing references to the 
symbol or defining the symbol. Present when XREF B or P is in effect. 

The location counter address of the instruction containing the reference. Pres¬ 
ent when XREF A or B is in effect. 
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flag 


Identifies page/line index to a statement that defines the symbol or uses it in an 
IF statement as follows: 


D Definition statement; EQU, =, SET, MAX, MIN, or MICCNT 
E ENTRY or ENTRYC pseudo instruction 
F Symbol used in conditional test 

I Symbol used for indirect storage (applies only to PPU or PERIPH 
assemblies) 

L Symbol used in location field of the statement 
S Symbol used for storage 
X EXT pseudo instruction 

When XREF A is in effect, the table does not include the flags. 

Example: 
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COMMON COMMON DECKS 


12 


The common common decks are a set of COMPASS subroutines which are powerful tools for use by 
COMPASS programmers. The common common decks perform functions such as: 

Data conversion 
Dynamic table management 
Saving/restoring registers 

Providing an input/output interface at the CIO and FET level 

All of the common common decks run under NOS and NOS/BE; a subset of them run under SCOPE 2. 
Table 12-1 shows each deck name, relocatable program name, entry point names, and the decks 
supported under SCOPE 2. 

12.1 RESIDENCE OF THE COMMON COMMON DECKS 

The source of the common common decks resides on the COMPASS old program library as a set of 
COMDE CKs. This old program library can be used by Update-based procedures as a secondary old 
program library (see the Update Reference Manual); the decks can be called just as one would call a 
common deck from one's own old program library. Modify-based products can convert the COMPASS 
old program library to an OPL via the UPMOD utility (see the Modify Reference Manual); the OPL is 
then used as the source for the common common decks. The source of the common common decks can 
also be obtained via the use of the COMPASS XTEXT pseudo-instruction using either an old program 
library or an OPL as input. System texts required to assemble the common common decks residing 
on the COMPASS old program library are IPTEXT and CPUTEXT. 

The common common decks (except the table management decks COMCMTM and COMCMTP) are also 
available as relocatable subroutines which reside on the system library SYSLIB. Relocatable programs 
need only include external references to entry point names in the common common decks. These 
external references are satisfied from SYSLIB at load time. (The CYBER Loader searches SYSLIB by 
default when satisfying external references but the SCOPE 2 Loader does not. Hence, under SCOPE 2, 
SYSLIB must be explicitly included in the library set.) 

12.2 DESCRIPTION OF THE COMMON COMMON DECKS 

A detailed external reference description of each common common deck follows. The decks are 
described in alphabetical order. Each description lists entry and exit conditions, registers used, and 
routines explicitly called. 

The following rules apply to the use of all common common decks: 

Any input/output buffers, string buffers, exchange package save areas, and so forth, to be used by 
any of the common common decks should not be located with the last 10B words of the field length. 
Some fetch loops, move loops, and so forth, may mode out if the above restriction is not adhered to. 

Registers that are not used by the common common decks are not modified. 

Entry and exit conditions are only those listed in the descriptions below. 
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TABLE 12-1. SUMMARY OF COMMON COMMON DECKS 


Common Common 

Deck Name 

Relocatable 
Program Name 

Entry Points 

Available under 
SCOPE 2 

COMCARG 

CPU. ARG 

ARG= 

Yes 

COMCCDD 

CPU. CDD 

CDD= 

Yes 

COMCCFD 

CPU.CFD 

CFD= 

Yes 

COMCCIO 

CPU. CIO 

CIO= 

No 

COMCCOD 

CPU. COD 

COD= 

Yes 

COMCCPT 

CPU. CPT 

CPT= 

Yes 

COMCDXB 

CPU.DXB 

DXB= 

Yes 

COMCMNS 

CPU.MNS 

MNS= 

Yes 

COMCMOS 

CPU. MOS 

MOS= 

Yes 

COMCMTM 



Yes 

COMCMTP 



Yes 

COMCMVE 

CPU.MVE 

MVE= 

Yes 

COMCRDC 

CPU.RDC 

RDC= 

No 

COMCRDH 

CPU.RDH 

RDH= 

No 

COMCRDO 

CPU.RDO 

RDO= 

No 

COMCRDS 


RDS= 

No 

COMCRDW 

. CPU.RDW 

RDW-- 

RDX= 

LCB= 

No 

COMCRSR 

CPU.RSR 

RSR= 

Yes 

COMCSFN 

CPU.SFN 

SFN= 

Yes 

COMCSRT 

CPU.SRT 

SRT= 

Yes 

COMCSST 

CFU.SST 

SST= 

Yes 

COMCSTF 

CPU.STF 

STF= 

No 

COMCSVR 

CPU.SVR 

SVR = 

Yes 

COMCSYS 

CPU. SYS 

SYS= 

RCL= 

WNB= 

MSG= 

No 

COMCUPC 

CPU. UPC 

UPC= 

Yes 

COMCWOD 

CPU. WOD 

WOD= 

Yes 

COMCWTC 

CPU.WTC 

WTC= 

No 

COMCWTH 

CPU.WTH 

WTH= 

No 

COMCWTO 

CPU.WTO 

WTO= 

No 

COMCWTS 

CPU.WTS 

WTS= 

No 

COMCWTW 

CPU.WTW 

WTW= 

WTX= 

DCB= 

No 

COMCXJR 

CPU.XJR 

XJR= 

No 

COMCZTB 

CPU. ZTB 

ZTB= 

Yes 
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12.2.1 COMCARG - PROCESS ARGUMENTS 


COMCARG processes a list of arguments by the use of an equivalence table. The arg um ent list must 
be in the following format: 

12/op,18/asv,12/st, 18/addr 

op One or two character keywords (left justified, zero filled) 
asv Address of assumed value 

st Status 

addr Address where argument is placed 


This format is generated by COMCUPC or the COMPASS VFD pseudo instruction. ARG= is the only 
entry point for COMCARG. 


Entry 

conditions: 

(Bl) 

1 

(B4) 

Argument count 

(A4) 

Address of first argument 

(X4) 

First argument 

(B5) 

Address of argument table 


Exit conditions: 

(XI) / 0 

1 Option not found in table 

2 Single argument equivalenced 

3 Illegal re-entry of argument 

Registers used: 

A2, A3, A4, A7 
B2, B3, B4 

XO, XI, X2, X3, X4, X6, X7 

The following conditions apply to the use of COMCARG: 

If a keyword=value form is found in the argument list, addr is set to the upper 42 bits of the argu¬ 
ment value (in bits 59-18) and the lower 18 bits of asv (in bits 17-0). 

If only a keyword is found in the argument list, addr is set to the full 60 bits of asv. 

If asv < 0, the argument cannot be equivalenced. 

If status=4000B, a zero value is retained as a display zero. Otherwise, a value of zero (full word) 
is stored at addr. 

If asv=addr, only one entry of that argument is allowed and op is set to -0. 


12.2.2 COMCCDD - CONSTANT TO DECIMAL DISPLAY CODE CONVERSION 

COMCCDD converts an integer constant to decimal display code. Up to ten digits are converted with 
leading zero suppression. The converted integer contains space fill. One register contains the display 
code right justified; another register contains it left justified. CDD= is the only entry point for 
COMCCDD. 
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Entry conditions: 


(Bl) 1 

(XI) Number to be converted 
Exit conditions: 

(B2) 6*(count of digits converted) 
(X4) Conversion left justified 
(X6) Convers ion «right justified 

Registers used: 

A2, A3, A4 
B2, B3, B4 

XI, X2, X3, X4, X6, X7 


12.2.3 COMCCFD - CONVERT CONSTANT TO F10.3 FORMAT 

COMCCFD converts a 30 bit integer to display code in FORTRAN F10.3 format. The integer 
represents the floating point value time 1000. One register contains the display code right justified 
with blank fill; another register contains it left justified with blank fill. Leading zeros in the integer 
portion are suppressed. CFD= is the only entry point for COMCCFD. 

Entry conditions: 

(Bl) 1 

(XI) Integer to be converted 

Exit conditions: 

(B3) -(number of blank fill bits in result) 

(X4) Conversion left justified 

(X6) Conversion right justified 

Registers used: 

Al, A2, A3, A4 
B2, B3, B4, B5 
XI, X2, X3, X4, X6, X7 


12.2.4 COMCCIO - I/O OPERATION PROCESSOR 

COMCCIO performs input/output operations via the peripheral processor program CIO. An operation 
is performed when the buffer is not busy. If the file-status-word is zero, the operation is not proces¬ 
sed and IN and OUT are set to FIRST. CIO= is the only entry point for COMCCIO. 

Entry conditions: 

(X2) 24/unused, 18/skip count to CIO, 18/FET address for file 

(X7) Function code; if < 0, X7 is the complement of the request and auto recall is requested 

Exit conditions: 

(X2) FET address 

(X7) 0 
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If ERP$ is defined: 

(X2) FET address 

(X7) FET error code: 

0 No error, operation performed, normal exit 

other Error code from FET; operation not performed, exit to ERP$ 

If ERP1$ is defined: 

(X2) FET address 

(X7) FET error code: 

0 No error, operation performed, normal exit 

other Error code from FET; operation not performed, normal exit 

Registers used: 

Al, A6, A7 
XI, X2, X6, X7 

12.2.5 COMCCOD - CONVERT CONSTANT TO OCTAL DISPLAY CODE 

COMCCOD converts an integer constant to octal display code with leading zero suppression. Up to ten 
digits can be converted. The converted integer contains space fill. One register contains the display 
code right justified, another register contains it left justified. COD= is the only entry point for 
COMCCOD. 

Entry conditions: 

(Bl) 1 

(XI) Number to be converted 
Exit conditions: 

(B2) 6*(count of digits converted) 

(X4) Conversion left justified 

(X6) Conversion right justified 

Registers used: 

A4 

B2, B3, B4 

XI, X2, X3, X4, X6, X7 


12.2.6 COMCCPT - EXTRACT COMMENTS FIELD FROM PREFIX TABLE 

COMCCPT copies the comments field of a prefix (7700g) table to a working storage area. Either the old 
or new forms of the prefix table can be used. COMCCPT differentiates between the forms by checking 
word FWA+3 of the table to see if it looks like a time-of-day word. The copy terminates on end-of-table, 
zero byte, or COPYRIGHT. The working storage area is terminated by a zero word. CPT= is the only 
entry point for COMCCPT. 

Entry conditions: 

(Al) Prefix table address 

(A6) Address of working storage - 1 
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(Bl) 

(XI) 


1 

Control word 


Registers used: 

A2, A3, A4, A6 
B3, B4 

XI, X2, X3, X4, X6 


12.2.7 COMCDXB - CONVERT DISPLAY CODE TO BINARY 

COMCDXB converts one word of display code digits into internal integer format. Either a base 10 or a 
base 8 string of digits can be converted as specified in the call. This specification, however, is over¬ 
ridden if an explicit B (octal) or D (decimal) is the last character of the value to be converted. DXB = 
is the only entry point for COMCDXB. 

The assembly option DXB1$ controls the processing of an 8 or 9 when octal is specified for the display 
code value and no explicit B or D appears in the value. If DXB1$ is not defined, an error occurs. If 
DXB1$ is defined, the value is considered to be decimal. 

Entry conditions: 

(Bl) 1 

(B7) Base; if > 0, decimal base; if 0, octal base. 

(X5) Word to be converted (left justified, zero filled) 

Exit conditions: 

(X6) Converted digits 

(X4) Error code: 

0 No error 

other Error in assembly 

Registers used: 

B2, B3, B4, B5 

X0, XI, X2, X3, X4, X5, X6, X7 

The presence of one or more of the following always causes an error: 

A non-digit in the word to be converted 

A character after the post radix 

An 8 or 9 with the post radix equal to B 


12.2.8 COMCMNS - MOVE NON-OVERLAPPING BIT STRING 

COMCMNS moves a specified source string from one location to another in central memory. The only 
bits disturbed in the destination field are those extracted to accept the source string. The destination 
field must not overlap the source field in anyway; results are undefined if overlapping occurs; 
COMCMOS can be used for overlapping moves MNS= is the only entry point for COMCMNS. 

Entry conditions: 

(Bl) i 

(B2) Source first bit (0,1,..., 59) 

(B4) Destination first bit (0, 1, ... , 59) 
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(XO) Number of bits to move 

(X2) Source first word address 

(X4) Destination first word address 

Exit conditions: 


(Bl) 1 

(B2) Source next bit (0,1,..., 59) 

(B4) Destination next bit (0, 1, ... , 59) 
(X2) Source next word address 
(X4) Destination next word address 

Registers used: 

Al, A2, A3, A5, A6 

Bl, B2, B3, B4, B5, B6 

XO, XI, X2, X3, X4, X5, X6, X7 


12.2.9 COMCMOS - MOVE OVERLAPPING BIT STRING 

COMCMOS moves a specified source string from one location to another in central memory. The only 
bits disturbed in the destination field are those extracted to accept the source string. COMCMOS 
allows the user to move strings where the destination field overlaps (lies partly or completely within) 
the source field. If the move is not an overlap move, COMCMOS calls the faster common common 
deck COMCMNS to do the move. For this reason, COMCMNS should always be called whenever 
COMCMOS is. MOS= is the only entry point for COMCMOS. 

Entry conditions: 

(Bl) 1 

(B2) Source first bit (0, 1, ... , 59) 

(B4) Destination first bit (0, 1, ... , 59) 

(XO) Number of bits to move 

(X2) Source first word address 

(X4) Destination first word address 


Exit conditions: 


(Bl) 1 

(B2) Source next bit (0,1,..., 59) 

(B4) Destination next bit (0,1,..., 59) 

(X2) Source next word address 

(X4) Destination next word address 

Registers used; 

Al, A2, A3, A5, A6, A7 
Bl, B2, B3, B4, B5, B6 
X0, XI, X2, X3, X4, X5, X6, X7 


Calls: 


MNS= 
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12.2.10 COMCMTM - MANAGED TABLE MACROS 

COMCMTM contains four macros, ADDWRD, ALLOC, SEARCH, and TABLE, for generation, alloca¬ 
tion, and processing of managed tables. COMCMTM is intended to be used with COMCMTP. 

ADDWRD - ADD WORD TO TABLE 

ADDWRD adds a word to a managed table. ADDWRD calls ADW and uses AO and XI. 

Formats 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


ADDWRD 

table, reg 


table Table number 

reg Register name or expression for word to be added 

ALLOC - ALLOCATE TABLE SPACE 

ALLOC allocates table space. ALLOC calls ATS and uses AO and XI. 
Formats 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


ALLOC 

table, words 


table Table number 

words Word count (+ or -) to be added 

SEARCH - SEARCH MANAGED TABLE 

SEARCH searches for a specified entry. SEARCH calls EQS or MES and uses AO, B7, and X6. 
Formats 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


SEARCH 

tname, entry, mask 


tname Table name 

entry Entry to be searched for 

mask Search mask in XO; if not present, defaults to all bits. 

TABLE - GENERATE MANAGED TABLE 
TABLE generates a managed table. 
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Format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


TABLE 

tname, count, equiv 


tname Table name 

count Word count per entry (1 if not specified) 

equiv Equivalent table name; allows certain tables to be used by different processors 

After the table is generated: 

F. tname is the name of the word containing the table FWA. 

L. tname is the name of the word containing the table length. 

C. tname is the word count per entry. 

12.2.11 COMCMTP - MANAGED TABLE PROCESSORS 

COMCMTP contains the following routines for processing managed tables: 

ADW Adds a word to the table. 

AMU Returns the total memory used by the tables. 

ATS Allocates table space. 

EQS Searches table for equal entries. 

MES Searches a table for equal entries using a mask. 

MTD Moves the table down. 

MTU Moves the table up. 

Macros for calling these routines and for table generation are contained in COMCMTM. 

The managed table processors allow the partitioning of central memory into variable regions called 
tables. These tables are referenced by pointers that indicate the first word address of the table and 
the table length. Memory is allocated to each table as it is required; the user can delete space from 
the tables. Each table is allowed at least one word of expansion space to allow a dummy word between 
each table, thus, ensuring efficient search methods. 

The caller of the table processors is expected to provide certain constants for use by the processors. 
Other data is provided by COMCMTM. 

Data provided by the caller: 

MEML Lowest address of managed memory 

TOV Address of the table overflow processor 

Data provided by COMCMTM: 

NTAB Number of managed tables 

FTAB Start of table addresses 

LTAB Start of table lengths 

F. tnam Address pointer for table tnam 
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L. tnam 


Length pointer for table tnam 


Data dynamically changeable: 

TN Number of managed tables. Set to NTAB by COMCMTM. TN must be less than NTAB 

during use. 

TO Table overflow processor. Set to TOV by COMCMTM. 

LM Low memory limit. Set to MEMLby COMCMTM. If this value is increased, MTU 

should be called to allow room for change. 

F.TEND High memory limit. F. TEND must be initialized by the user. If this value is 
decreased, MTD should be called to allow room for change. 

TOVT TOV threshold. If the word is defined, it should contain the threshold for calling 

TOV; ATS calls TOV when the tables must be moved and less than TOVT free words 
remain. If TOVT is not defined, an effective value of zero is used. 


ADW - ADD WORD TO TABLE 
ADW adds a word to a managed table. 


Entry conditions: 


(AO) 

T able number 

(XI) 

Word to be added 

Exit conditions: 

(A 6) 

Address of added word 

(XI) 

Added word 

(X2) 

FWA of table 

(X3) 

Length of table 

(X6) 

Added word 


Registers used: 

Al, A2, A3, A4, A6, A7 
XI, X2, X3, X4, X6, X7 

Calls: 

ATS 

AMU - ACCUMULATE MEMORY USED 

AMU returns the amount of memory used by the managed tables or the current length, whichever is the 
largest. The variable MU is set to this value. 

Exit conditions: 

MU MAX(memory used, current assigned length) 
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Registers used: 


Al, A2, A6 
B2 

XI, X2, X3, X6 

ATS - ALLOCATE TABLE SPACE 

ATS allocates table space. The table length can be increased or decreased as specified. 

Entry conditions: 

(AO) Table number 

(XI) Change (+ or -) to the table size 

Exit conditions: 

(XI) Change made to the table size 

(X2) FWA of table 

(X3) New length of table 

(X7) Less than 0 if tables moved 


Registers used if tables are not moved. 

A2, A3, A4, A6 
X2, X3, X4, X6, X7 


Registers used if tables are moved: 


Al, A2, A3, A4, A6, A7 
B2, B3, B4, B5, B6, B7 
XO, XI, X2, X3, X4, X5, X6, X7 


Registers restored: 


B2, B3, B4, B5, B6, B7 (except -0 restored as +0) 
XO, XI, X5 


Calls: 

AMU, MVE=, TOV 

TOY, the user provided table overflow processor, is described below. 


Entry conditions: 

(Bl) 1 

(B5) Complement of number of words required 

(B6) Return address to continue processing 

The location TOV must contain executable code. TOV is entered via a JP instruction. 


Exit from TOV via a JP B6 instruction. 


Exit conditions: 


Only Bl must be preserved. 

A pointer word must be incremented by the number of words newly available. If TN has not been 
altered during execution, the address of the pointer word is F.TEND. If TN has changed, the 
address of the pointer word is FTAB-1 plus the contents of TN. 
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EQS - EQUALITY SEARCH TABLE 

EQS searches for a specified entry. 

Entry conditions: 

(AO) Table number 

(B7) Word count per entry 

(X6) Entry for search 

Exit conditions: 

(X2) = 0 if entry not found 
(X2) = entry, if found 
(A2) = address of entry found 

Registers used: 

Al, A2, A6 
XI, X2, X3, X7 

MES - MASKED EQUALITY SEARCH TABLE 

MES searches for a specified entry using a mask. 

Entry conditions: 

(AO) Table number 

(B7) Word count per entry 

(XO) Mask 

(X6) Entry for search 

Exit conditions: 

(X2) = 0 if entry not found 

(X2) = entry, if found 

(A2) = address of entry found 

Registers used: 

Al, A2, A6 

XI, X2, X3, X4, X7 

MTD - MOVE TABLES DOWN 

MTD moves the tables down (away from RA) to eliminate unused memory. 
Exit conditions: 

(B2) Number of tables 

Registers used: 

Al, A2, A3, A7 
B2, B3 

XO, XI, X2, X3, X4, X7 
Calls: 

MVE= 
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MTU - MOVE TABLES UP 


MTU moves the tables up (toward RA) to eliminate unused memory. 
Registers used: 

Al, A2, A7 
B3 

XO, XI, X2, X3, X7 
Calls: 

MVE = 


12.2.12 COMCMVE - MOVE BLOCK OF DATA 

COMCMVE moves a block of data to a specified location. COMCMVE moves the data from the source 
address through the source address plus the word count minus one to the destination address through 
the destination address plus the word count minus one. The move can be in either direction. MVE = 
is the only entry point for COMCMVE. 

Entry conditions: 

(Bl) 1 

(XI) Word count 

(X2) Source address 

(X3) Destination address 

Registers used: 

A2, A4, A6, A7 
B7 

XI, X2, X3, X4, X6, X7 


12.2.13 COMCRDC - READ CODED LINE, C FORMAT 

COMCRDC reads a coded line terminated by a zero byte from a CIO buffer to a working buffer. RDC= 
is the only entry point for COMCRDC. 

Entry conditions: 

(B6) FWA of working buffer 

(B7) Word count of working buffer 

(X2) Address of FET for file 

If B7 is less than zero, then -B7 is the word count of the working buffer; COMCRDC will not read 
and discard words until an end-of-line for lines longer than the working buffer. 

Exit conditions: 

(B1) 1 

(B6) Address of last word transferred to working buffer plus one 
(XI) Status of transfer: 

0 Transfer completed 
-1 EOF detected on file 
-2 EOI detected on file 

B6 EOR detected on file before transfer completed 
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(X2) Address of FET for file 

(X4) Contents of last data word transferred before EOL guaranteed 
(X7) Level number of EOR 

Registers used: 

Al, A2, A3, A4, A6, A7 
Bl, B2, B3, B4, B5, B6, B7 
XI, X2, X3, X4, X6, X7 

Calls: 

LCB=, RDX= 


12.2.14 COMCRDH - READ CODED LINE, H FORMAT 

COMCRDH reads a coded line terminated by a zero byte from a CIO buffer to a working buffer with 
trailing space fill. RDH= is the only entry point for COMCRDH. 

Entry conditions: 

(B6) FWA of working buffer 
(B7) Word count of working buffer 

(X2) Address of FET for file 

Exit conditions: 

(Bl) 1 

(B6) Address of last word transferred to working buffer plus one 
(XI) Status of transfer: 

0 Transfer completed 
-1 EOF detected on file 
-2 EOI detected on file 

B6 EOR detected on file before transfer completed 
(X2) Address of FET for file 

(X7) Level number of EOR 

Registers used: 

Al, A2, A3, A4, A6 

Bl, B2, B3, B4, B5, B6, B7 

XI, X2, X3, X4, X6, X7 

Calls: 

LCB=, RDX= 


12.2.15 COMCRDO - READ ONE WORD 

COMCRDO reads one word from a CIO buffer into X6. RDO= is the only entry point for COMCRDO. 

Entry conditions: 

(Al) Address of IN pointer 
(XI) IN 
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Exit conditions: 


(Bl) 1 

(XI) Status of transfer: 

0 Transfer completed 
1 EOR detected on file 

-1 EOF detected on file 

-2 E OI detected on file 
(X2) Address of FET for file 

(X6) Word read 


Registers used: 

Al, A2, A3, A4, A6, A7 
Bl 

XI, X2, X3, X4, X6, X7 
Calls: 


CIO- 


12.2.16 COMCRDS - READ CODED LINE TO STRING BUFFER 

COMCRDS reads a coded line from a CIO buffer to a working buffer. Words in the circular buffer are 
unpacked and stored one character per word in the working buffer. This process is continued until 
the end-of-line byte is detected. If the coded line terminates before the working buffer is filled, the 
working buffer is padded with spaces; the buffer is not padded if the complement of the word count of 
the buffer is used. If the coded line exceeds the size of the working buffer, the excess characters are 
ignored. RDS= is the only entry point for COMCRDS. 

Entry conditions: 

(B6) FWA of working buffer 

(B7) Word count of working buffer 

(X2) Address of FET for file 

If B7 is less than 0, B7 is the complement of the buffer length and the string buffer will not be 
space filled. 

Exit conditions: 

(Bl) 1 

(B6) Address of the last character from the coded line in the working buffer plus one 
(XI) Status of transfer: 

0 Transfer completed 
-1 EOF detected on file 
-2 EOI detected on file 

B6 EOR detected on file before transfer completed 
(X2) Address of FET for file 

(X7) Level number of EOR 

Registers used: 


Al, 

A2, 

A3, 

A4, 

A6, 

A7 

' 

Bl, 

B2, 

B3, 

B4, 

B5, 

B6, B7 


XI, 

X2, 

X3, 

X4, 

X6, 

X7 
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Calls: 


LCB=, RDX= 


12.2.17 COMCRDW - READ WORDS TO WORKING BUFFER 

COMCRDW reads a specified number of words from a CIO buffer to a working buffer. COMCRDW also 
contains the load CIO buffer and read exit routines required by COMCRDC, COMCRDH, and COMCRDS. 
RDW=, LCB=, and RDX= are the entry points for COMCRDW. 

Entry conditions: 

(B6) FWA of working buffer 

(B7) Word count of working buffer 

(X2) Address of FET for file 

Exit conditions: 

(Bl) 1 

(B6) Address of last word transferred to the working buffer plus one 
(B7) Word count remaining to be transferred 
(XI) Status of transfer: 

0 Transfer completed 
-1 EOF detected on file 
-2 E OI detected on file 

-3 CIO= was called to read more data and returned an error status 
B6 EOR was detected on file before transfer was completed 
(X2) Address of FET for file 

(X7) Error status if XI is -3, otherwise level number of EOR 

Registers used: 

Al, A2, A3, A4, A6, A7 
Bl, B2, B3, B4, B5, B6, B7 
XI, X2, X3, X4, X6, X7 

Calls: 

CIO= 


12.2.18 COMCRSR - RESTORE ALL REGISTERS 

COMCRSR restores the B, A, and X registers from a specified register save area. The format of the 
registers in the save area is BO, Bl, . . . , B7, AO, Al, . . . , A7, XO, XI, .... X7. Each regis¬ 
ter occupies a full word with the B and A register values in bits 17-0. RSR= is the only entry point for 
COMCRSR. 

Entry conditions: 

(XI) Address of register save area 
Exit conditions: 

All registers are set to the content of the register save area. 
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Registers used: 


AO, Al, A2, A3, A4, A5, A6, A7 
Bl, B2, B3, B4, B5, B6, B7 
XO, XI, X2, X3, X4, X5, X6, X7 


12.2.19 COMCSFN - SPACE FILL NAME 

COMCSFN converts trailing 00 characters in a word to blanks. SFN= is the only entry point for 
COMCSFN. 

Entry conditions: 

(XI) Name left justified, zero fill 
(Bl) 1 

Exit conditions: 

(X6) Name space filled 

(X7) Final character mask 

Registers used: 

A3 

B2 

X3, X6, X7 


12.2.20 COMCSRT - SET RECORD TYPE 

COMCSRT identifies the format of a record from the first 64 words located in a working buffer. The 
type codes returned are listed in table 12-2. L. SRT is defined to be the largest number assigned a 
record type code. SRT= is the only entry point for COMSCRT. 

Entry conditions: 

(Bl) 1 

(XI) LWA+1 of block 

(X2) FWA of current record 

Exit conditions: 

(X6) 42/OL r* name, 12/0, 6/type number 

(X7) Record name in L format 

If type number and record name are zero, the record is zero length. 

Registers used: 

Al, A2, A3 
B2, B3 

XO, XI, X2, X3, X4, X6, X7 

12.2.21 COMCSST - SHELL SORT TABLE 

COMCSST sorts a table of one word entries into ascending order using a shell sort. All of the entries 
should be of the same sign. SST= is the only entry point for COMCSST. 
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TABLE 12-2. TYPE CODES RETURNED BY COMCSRT 


Type 

Number 

Format 

TEXT 

0 

Text record 

6PP 

1 

6000-series peripheral processor overlay 

COS 

2 

Chippewa OS formatted program 

REL 

3 

Relocatable subprogram 

OVL 

4 

Central processor overlay 

ULIB 

5 

NOS user library 

OPL 

6 

Modify program library deck 

OPLC 

7 

Modify program library common deck 

OPLD 

8 

Modify program library directory 

ABS 

9 

Multiple entry point overlay 

7PP 

10 

7000-series peripheral processor overlay 

UPL 

11 

Update sequential program library 

UCF 

12 

Update compressed compile file 

ACF 

13 

Modify compressed compile file 

CAP 

14 

Fast dynamic load capsule 

DATA 

15 

Arbitrary data 


16 

CDC reserved 

PROC 

17 

Procedure record 

SDR 

18 

Special deadstart record 


Entry conditions: 

(Bl) 1 

(B7) Address of table to be sorted 
(XI) Number of elements in the table 

Exit conditions: 

The table is sorted. 

Registers used: 

Al, A2, A6, A7 
B2, B3, B4, B5 
XI, X2, X3, X4, X6, X7 
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12.2.22 COMCSTF - SET TERMINAL FILE 


COMCSTF detects if a file is assigned to an interactive terminal. STF= is the only entry point for 
COMCSTF. 

Entry conditions: 

(Bl) 1 

(X2) Address of FET 

The FET must be greater than five words in length. 


Exit conditions: 

(X2) Address of FET 

(X6) 0 if file is assigned to a terminal 

Registers used: 

Al, A4 

XI, X3, X4, X6 
Calls: 

ClO= 


12.2.23 COMCSVR - SAVE ALL REGISTERS 

COMCSVR saves the B, A, and X registers in a specified register save area. The registers are saved 
in the following order: 

BO, Bl.B7, AO, Al, . . . , A7, XO, XI, ...» X7 

Each register occupies a full word with the B and A register values in bits 17-0. B and A registers are 
sign extended. SVR= is the only entry point for COMCSVR. 

Entry conditions: 

Bits 17-0 of the word from which SVR= was called contain the address of the register save area. 
Exit conditions: 

(save thru save+7) B registers 

(save+8 thru save+15) A registers 
(save+16 thru save+23) X registers 

Registers used: 

AO, Al, A2, A3, A4, A5, A6, A7 
Bl, B2, B3, B4, B5, B6, B7 
XO, XI, X2, X3, X4, X5, X6, X7 

12.2.24 COMCSYS - PROCESS SYSTEM REQUEST 

COMCSYS issues a system monitor request through RA+1. SYS=, RCL=, WNB=, and MSG= are the 
entry points for COMCSYS. , 
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SYS= - PROCESS SYSTEM REQUEST 

SYS= waits for RA+1 to clear before issuing the desired request. Central exchange jump hardware is 
used if it is available. If the hardware is not available and the auto-recall bit is set, SYS= waits for the 
monitor to process the call before returning. 

Entry conditions: 

(X6) System request 

Exit conditions: 

Request processed 

Registers used: 

Al, A6 
X6 

RCL= - PLACE PROGRAM ON RECALL 

RCL= issues a single system request for periodic recall. If RA+1 is busy, no request is issued. 

Exit conditions: 

Request processed. 

Registers used: 

Al 

XI, X6 

WNB= - WAIT NOT BUSY 

WNB= waits for a specified status word, bit 0, to be set. If the word is initially 0, WNB= returns. 
Entry conditions: 

(X2) Address of status word 
Exit conditions: 

Returns when bit 0 of status word is set. 

Registers used: 

Al 

XI, X6 

MSG= - SEND MESSAGE 

MSG= formats and issues a system request to send a dayfile message. 
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Entry conditions: 


(XI) Address of data 
(X6) Message options: 

bit 16 - Auto recall if on 

bits 11 through 0 - Message option code 

Exit conditions: 

Returns when operation is complete. 

Registers used: 

Al, A6 
XI, X6 


12.2.25 COMCUPC - UNPACK CONTROL CARD 

COMCUPC unpacks a control statement into the keyword and individual parameters. The following 
conditions apply to the use of COMCUPC: 

• If B7 is negative on entry, a blank after the keyword is considered to be a separator; otherwise, blanks 
are ignored. 

• The characters ) and . are considered as the termination of the control statement. 

• Characters with display code values 0 or 60B through 77B are illegal before the terminator. 

• The parameter must contain 7 or fewer characters. 

• The parameters are stored left-justified with zero fill. 

• The separator character is placed in the lower 18 bits of the parameter unless it is a *,* in which case 
the lower 18 bits are zero. 

• Two successive separators or a separator followed by a terminator results in a parameter of all zeros. 
UPC= is the only entry point for COMCUPC. 

Entry conditions: 

(A5) Address of first word of control statement 
(Bl) 1 

(B7) First word address of buffer containing parameter information 
(X5) First word of control statement 

If B7 is negative, B7 contains the complement of the first word address of the parameter buffer. 

Exit conditions: 

(B6) Parameter count 

(X6) 0 if no error during unpacking 

Registers used: 

Al, A2, A5, A6, A7 

B2, B3, B4, B5, B6 

XO, XI, X2, X3, X4, X5, X6, X7 
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12.2.26 COMCWOD - CONVERT WORD TO OCTAL DISPLAY CODE 


COMCWOD converts a word into octal display code. WOD= is the only entry point for COMCWOD. 

Entry conditions: 

(XI) Word to be converted 

Exit conditions: 

(Bl) 1 

(X6, X7) Conversion 

Registers used: 

A2, A3, A4, AS 

XO, XI, X2, X3, X4, X5, X6, X7 


12.2.27 COMCWTC - WRITE CODED LINE, C FORMAT 

COMCWTC writes a zero byte delimited line from a working buffer to a CIO buffer. If the CIO buffer 
becomes sufficiently full to require writing or if the device type indicates a NOS/BE terminal, COMCWTC 
performs a WRITE function unless the symbol WRIF$ is defined. In this case, the CIO function that is in 
the FET is reissued. WTC= is the only entry point for COMCWTC. 

Entry conditions: 

(B6) FWA of working buffer 
(X2) Address of FET for file 

Exit conditions: 

(Bl) 1 

(X2) Address of FET for file 

Registers used: 

Al, A2, A3, A4, A6, A7 
Bl, B2, B3, B4, B5, B6 
XI, X2, X3, X4, X6, X7 

Calls: 

DCB=, WTX= 


12.2.28 COMCWTH - WRITE CODED LINE, H FORMAT 

COMCWTH writes a coded line in H format from a working buffer to a CIO buffer. Trailing spaces are 
deleted. If the buffer becomes sufficiently full to require writing, or the device type indicates a NOS/BE 
terminal, COMCWTH performs a WRITE function unless the symbol WRIF$ is defined. In this case, the 
CIO function that is in the FET is reissued. If the line to be written terminates with 6 bits of zero, a 
word containing a blank byte is appended to preserve the 00 character as a colon. If the line terminates 
on an end-of-line, it is written as is. WTH= is the only entry point for COMCWTH. 
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Entry conditions: 


(B6) FWA of working buffer 

(B7) Word count of working buffer 

(X2) Address of FET for file 

If B7 is 0, no transfer is performed. 


Exit conditions: 

(Bl) 1 

(X2) Address of FET for file 

Registers used: 

Al, A2, A3, A4, A6, A7 
Bl, B2, B3, B4, B5, B6, B7 
XI, X2, X3, X4, X6, X7 

Calls: 

DCB=, WTX- 


12.2.29 COMCWTO - WRITE ONE WORD 

COMCWTO writes one word to a CIO buffer from X6. If the buffer becomes sufficiently full to require 
writing, COMCWTO performs a WRITE function unless the symbol WRIF? is defined. In this case, the 
CIO function that is in the FET is reissued. WTO= is the only entry point for COMCWTO. 

Entry conditions: 

(A 1) Address of IN pointer 
PQ) IN 

(X6) Word to write 
Exit conditions: 

(Bl) 1 

(X2) Address of FET for file 

Registers used: 

Al, A2, A3, A4, A6, A7 
Bl 

XI, X2, X3, X4, X6, X7 


12.2.30 COMCWTS - WRITE CODED LINE FROM STRING BUFFER 

COMCWTS writes a coded line from a working buffer to a CIO buffer with trailing space suppression. 
Characters in the working buffer are packed and stored in the circular buffer. If the buffer becomes 
sufficiently full to require writing or if the device type indicates a NOS/BE terminal, COMCWTS performs 
a WRITE function unless the symbol WRIF$ is defined. In this case, the CIO function that is in the FET 
is reissued. WTS= is the only entry point for COMCWTS. 
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Entry conditions: 


(B6) FWA of working buffer 

(B7) Word count of working buffer 

(X2) Address of FET for file 

If B7 is 0, no transfer is performed. 

Exit conditions: 

(Bl) 1 

(B6) Word count of data written 
(X2) Address of FET for file 

Registers used: 

Al, A2, A3, A4, A6, A7 
Bl, B2, B3, B4, B5, B6, B7 
XI, X2, X3, X4, X6, X7 

Calls: 

DCB=, WTX= 

12.2.31 COMCWTW - WRITE WORDS FROM WORKING BUFFER 

COMCWTW writes data from a working buffer to a CIO buffer. If the buffer becomes sufficiently full to 
require writing or if the device type indicates a NOS/BE terminal, COMCWTW performs a WRITE 
function unless the symbol WRIF$ is defined. In this case, the CIO function that is in the FET is reissued 
WTW=, DCB=, and WTX= are the entry points for COMCWTW. 

Entry conditions: 

(B6) FWA working buffer 

(B7) Word count of working buffer 

(X2) Address of FET for file 

If B7 is 0, no transfer is performed. 

Exit conditions: 

(Bl) 1 

(B6) Address of next word to be transferred from working buffer 
(B7) Status of transfer: 

0 Transfer completed 

other Remaining word count if CIO= was called to write data and returned an error status 
(X2) Address of FET for file 

(X7) Error status if B7 is 0 


Registers used: 

Al, A2, A3, A4, A6, A7 
Bl, B2, B3, B4, B5, B6, B7 
XI, X2, X3, X4, X6, X7 

Calls: 
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12.2.32 COMCXJR - RESTORE ALL REGISTERS WITH A SYSTEM XJR CALL 


COMCXJR restores all registers from a register save area with a system XJE call. The format of the 
registers in the save area is BO, Bl, . . . , B7, AO, Al, . . . , A7, XO, XI, . . . , X7. Each register 
occupies a full word with the JB and A register values in bits 17-0. XJR= is the only entry point for 
COMCXJB. 


Entry conditions: 

(XI) Address of the register save area. 

Exit conditions: 

All registers are set to the contents of the register save area. 

Registers used: 

AO, Al, A2, A3, A4, A5, A6, A7 
BO, Bl, B2, B3, B4, B5, B6, B7 
XO, XI, X2, X3, X4, X5, X6, X7 

12.2.33 COMCZTB - CONVERT ALL 00 CHARACTERS TO BLANKS 

COMCZTB converts all 00 characters in a word to blanks. ZTB= is the only entry point for COMCZTB. 
Entry conditions: 

(Bl) 1 

(XI) Word to be converted 

Exit conditions: 

(X6) Converted word 

(X7) Final character mask 

Registers used: 

A3 

X3, X6, X7 


12.3 MACROS THAT CALL THE COMMON COMMON DECKS 

Entry points in the common common decks can be called by using system macros. Table 12-3 shows 
which macros call entry points in the common common decks. All of the macros are supported under 
NOS and NOS/BE. Only the MOVE macro is supported under SCOPE 2. All macros applicable to a 
given operating system exist in the system text CPUTEXT. Each macro is described in detail in the 
following paragraphs. 

12.3.1 MESSAGE 

MESSAGE displays a message on the system console display and enters it into a dayfile. If the job is of 
system origin, the message can be flashed on the B display by including a dollar sign as the first charac¬ 
ter of the message. MESSAGE requires the common common deck COMCSYS. 


60492600 F 


12-25 




TABLE 12-3. MACROS THAT CALL COMMON COMMON DECKS 


Macro 

Entry Points 
Called 

Description 

MESSAGE 

MSG= 

Displays a message on the system 
console and enters it in a dayfile. 

MOVE 

MVE= 

Moves a block of data from one 
address to another. 

RE ADC 

RDC= 

Reads one coded line from the input/output 
buffer to the working buffer. 

READH 

RDH= 

Reads one coded line with space fill from 
the input/output buffer to the working 
buffer. 

RE ADO 

RDO= 

Reads one word from the input/output 
buffer to X6. 

READS 

RDS= 

Reads a line image to a character 
buffer. 

READW 

RDW= 

Fills the working buffer from an 
input/output buffer. 

RECALL 

RCL= 

WNB= 

Relinquishes the CPU until a 
function is completed or the CPU 
recall time has elapsed. 

SYSTEM 

SYS= 

Requests the system to process 
any three-character request. 

WRITE C 

WTC= 

Writes a coded line image from the working 
buffer to the input/output buffer. 

WRITE H 

WTH= 

Writes a coded line, deleting all 
trailing spaces, from the working 
buffer to the input/output buffer. 

WRITE O 

WTO= 

Writes one word from X6 to the 
input/output buffer. 

WRITES 

WTS= 

Writes a line image from the 
character buffer. 

WRITE W 

WTW= 

Writes data from the working 
buffer to the input/output buffer. 
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The maximum length that a message can be is 80 characters; up to 40 characters per line are displayed. 
The message ends with either the first word containing 12 bits of zeros in any byte or at the eightieth 
character. The user must pack the display code message in sequential locations before calling MESSAGE. 

The format of the RA+1 call for this macro is: 


59 


40 


3 


35 


23 


17 


RA+1 


MSG 


addr 


Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


MESSAGE 

addr,x,r 


addr Beginning address of the message. If the upper 12 bits of the location specified by this 

address are zero, then the next 18 bits (47 thru 30) of this location are assumed to contain 
the beginning address of the message. 

x Message routing option: 

0 Message is placed in the system dayfile, the user dayfile, and is displayed at line 1 of 
the control point. 

1 Message is displayed at line 1 of the control point. 

2 Message is displayed at line 2 of the control point. 

3 Message is placed in the user dayfile and displayed at line 1 of the control point. 

4 Message is placed in the error log dayfile if the job is a special system job (that is, has 

an SSJ= entry point) or is of system origin; otherwise, the message is placed in the user 
dayfile. 

5 Message is placed in the account dayfile if the job is a special system job or is of system 
origin; otherwise, the message is placed in the user dayfile. 

6 Message is placed in the system dayfile, the user dayfile, and is displayed at line 1 of 
the control point. 

7 Message is placed in the user dayfile and displayed at line 1 of the control point. 

If x is not specified or is an illegal value, x=0 is assumed. If x is not defined, x=l is 
assumed. If x is the character string LOCAL, x=3 is used. 

r If r is specified, control is not returned until the operation is complete. 

The control point message areas (lines 1 and 2) provide the user with the ability to display concurrently 
messages that enter the dayfile and those that require operator action. Line 2 is normally used to display 
information about the current status of the executing program. 

Only messages that do not refer to the job, such as the control statements processed and compilers used, 
should be placed in the system dayfile (x=0). All messages that refer to the job, such as the path taken 
by the programs and the number of records copied, should be placed only in the user dayfile (x=3). All 
messages placed in the user dayfile (x=0 and x=6) are counted by the system. If the number of messages 
issued by the job exceeds the limit for which the user is validated, the error message MESSAGE LIMIT; 
is issued to the user dayfile and the job is aborted. 
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12.3.2 MOVE 


MOVE moves a block of data from one address to another. MOVE requires the common common deck 
COMCMVE for absolute assemblies. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


MOVE 

count, addrl, addr2 


count Number of words in the block to be moved 

addrl Address of the first word of the block to be moved 

addr2 Address of the first word of the destination 


| MOVE allows overlap in data moves (addr2 can be less than addrl plus count). 

12.3.3 READC 

READC reads one coded line from the input/output buffer to the working buffer. Data is transferred 
until the end of the line (0000 in bits 11 through 0) is sensed or until the specified number of words are 
transferred. READC requires the common common deck COMCRDC. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


READC 

addr, buf, n 


addr FET address 

buf Working buffer address 

n Working buffer word count 


12.3.4 READH 

READH reads a coded line with space fill from the input/output buffer to the working buffer. Data is 
transferred until the end of the line (0000 in bits 11 through 0) is sensed or until the specified number of 
words are transferred. READH requires the common common deck COMCRDH. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


READH 

addr, buf, n 
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addr FET address 

buf Working buffer address 

n Working buffer word count 

12.3.5 READO 

RE ADO reads one word from the input/output buffer to X6. READO requires the common common deck 
COMCRDO. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


READO 

addr 


addr FET address 


12.3.6 READS 

READS reads a line image to a character buffer. The words are unpacked and stored in the working 
buffer right justified, one character per word, until the end-of-byte (0000) is detected. If the coded 
line terminates before the specified number of characters are stored, the working buffer is blank filled. 
READS requires the common common deck COMCRDS. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


READS 

addr, buf, n 


addr FET address 

buf Working buffer address 

n Working buffer word count 


12.3.7 READW 

READW fills the working buffer from an input/output circular buffer. READW reads ahead in the input/ 
output buffer. This could cause the program to abort if the last word address of the input/output buffer is 
within four words of the FL. If the word count is greater than the length of the working buffer, READW 
writes beyond the end of the working buffer. READW requires the common common deck COMCRDW. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


READW 

addr, buf, n 
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addr FET address 

buf Working buffer address 

n Working buffer word count 


12.3.8 RECALL 

RECALL enables the user to relinquish the CPU until a function is completed or the CPU recall time has 
elapsed (delay time depends on the operating system and the site). If the stat parameter is included in the 
call, control is not returned to the program until bit 0 of the word specified by stat is set. If stat is not 
included in the macro call, the program relinquishes the CPU only until the next pass through the recall 
loop. RECALL requires the common common deck COMCSYS. 


The format of the RA+1 call for this macro is: 
59 40 

n 


17 


RA+1 


RCL 


stat 


Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


RECALL 

stat 


stat If this parameter is present, control is returned to the program when bit 0 of the word 

specified by the address stat is set. 

12.3.9 SYSTEM 

SYSTEM processes a three-letter request. The request can be either the functions that MTR performs 
or a PPU program. A PPU program can be called from a CPU program if the first character of the 
name is alphabetic. SYSTEM requires the common common deck COMCSYS. 

The format of the RA+1 call for this macro is: 


59 40 35 17 0 



Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


SYSTEM 

req,r,pl,p2 
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req Three-character system request 

r If specified, control is returned only after the request is completed 

pi Bits 17 through 0 of the request 

p2 Bits 35 through 18 of the request 


12.3.10 WRITEC 

WRITE C writes a coded line image from the working buffer to the input/output buffer. Data is trans¬ 
ferred until the end of the line (0000 in bits 11 through 0) is sensed. WRITEC requires the common 
common deck COMCWTC. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


WRITEC 

addr,buf 


addr FET address 

buf Working buffer address 


12.3.11 WRITEH 

WRITEH writes a coded line, deleting all trailing spaces, from the working buffer to the input/output 
buffer. WRITEH requires the common common deck COMCWTH. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


WRITEH 

addr, buf, n 


addr FET address 

buf Working buffer address 

n Working buffer word count 


12.3.12 WRITEO 

WRITEO writes one word from X6 to the input/output buffer. WRITEO requires the common common 
deck COMCWTO. 
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Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


WRITEO 

addr 


addr FET address 


12.3.13 WRITES 

WRITES writes a line image from the working buffer. Characters are packed ten characters per word. 
Trailing spaces are deleted before the characters are packed. WRITES requires the common common 
deck COMCWTS. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


WRITES 

addr,buf, n 


addr FET address 

buf Working buffer address 

n Working buffer word count 


12.3.24 WRITEW 

WRITEW writes data from the working buffer to the input/output circular buffer. WRITEW writes ahead 
in the input/output buffer. This could cause the program to abort if the last word address of the input/ 
output buffer is within four words of the FL. If the word count is greater than the length of the working 
buffer, WRITEW reads beyond the end of the working buffer. WRITEW requires the common common 
deck COMCWTW. 

Macro format: 


LOCATION 

OPERATION 

VARIABLE SUBFIELDS 


WRITEW 

addr, buf, n 


addr FET address 

bjuf Working buffer address 

n Working buffer word count 
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CHARACTER SETS 


A 


NOTES 

1. The terms upper case and lower case apply only to the case conversions, and 
do not necessarily reflect any true case. 

2. When translating from display code to ASCII/EBCDIC the upper case equivalent 
character is taken. 

3. When translating from ASCII/EBCDIC to display code, the upper case and lower 
case characters fold together to a single display code equivalent character. 

4. All ASCII and EBCDIC codes not listed are translated to display code 55 (space). 

5. Where two display code graphics are shown for a single octal code, the leftmost 
graphic corresponds to the CDC 64-character set (system assembled with IP CSET 
set to C64.1), and the rightmost graphic corresponds to the CDC 64-character 
ASCII subset (system assembled wiih IP CSET set to C64.2). 

6. In a 63-character set system, the display code for the : graphic is 63. The % 
character does not exist, and translations from ASCII/EBCDIC % or ENQ yield 
blank (55 ). The display code value 00 is undefined in 63-character set systems. 

O 

7. Twelve or more zero bits at the end of a 60-bit word are interpreted as an 
end-of-line mark rather than two colons. An end-of-line mark is converted to 
external BCD 1632 and internal BCD 1672 by operating systems when writing 
7-track magnetic tape in even parity (coded) mode, and converted back to 0000 
when reading. 

8. This code is changed to 12 when written on a 7-track magnetic tape in even 
parity (coded) mode. 

9. 11-0 and 11-8-2 are equivalent on input. The character will be punched as 

11- 0 on output. 

10. 12-0 and 12-8-2 are equivalent on input. The character will be punched as 

12- 0 on output. 

11. 12-8-7 and 11-0 are equivalent on input. The character will be punched as 
12-8-7 on output. 

12. 12-8-4 and 12-0 are equivalent on input. The character will be punched as 
12-8-4 on output. 

13. CODE pseudo selects 6-bit octal code as follows: 

A ASCII 

D Display Code (default) 

E External BCD 

I Internal BCD 
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CODE E 

CODE D (default) j CODE I COD g A 


Disp 

Coc 

Octal 

@ 

lay 

le 

Char. 

Hollerith 

Punch 

(026) 

B 

Ext. 

CD 

Int. 

© 

6-Bit 

Octal 

@ 

Upi 

Hex. 

)er Case 

Char. 

AS 

Punch 

(029) 

CII 

Hex. 

Lowei 

Char. 

Case 

Punch 

Upp 

Hex. 

EBCI 

er 

Char. 

MC 

Low 

Hex. 

er 

Char. 

00 

:© 

8-2 

oo® 

12 

32 

3A 

: 

8-2 

1A 

SUB 

9-8-7 

7A 


3F 

SUB 

01 

A 

12-1 

61 

21 

41 

41 

A 

12-1' 

61 

a 

12-0-1 

Cl 

A 

81 

a 

02 

B 

12-2 

62 

22 

42 

42 

B 

12-2 

62 

b 

12-0-2 

C2 

B 

82 

b 

03 

c 

12-3 

63 

23 

43 

43 

C 

12-3 

63 

c 

12-0-3 

C3 

C 

83 

c 

04 

D 

12-4 

64 

24 

44 

44 

D 

12-4 

64 

d 

12-0-4 

C4 

D 

84 

d 

05 

E 

12-5 

65 

25 

45 

45 

E 

12-5 

65 

e 

12-0-5 

C5 

E 

85 

e 

06 

F 

12-6 

66 

26 

46 

46 

F 

12-6 

66 

f 

12-0-6 

C6 

F 

86 

f 

07 

G 

12-7 

67 

27 

47 

47 

G 

12-7 

67 

g 

12-0-7 

C7 

G 

87 

g 

10 

H 

12-8 

70 

30 

50 

48 

H 

12-8 

68 

h 

12-0-8 

C8 

H 

88 

h 

11 

1 

12-9 

71 

31 

51 

49 

I 

12-9 

69 

1 

12-0-9 

C9 

I 

89 

i 

12 

J 

11-1 

41 

41 

52 

4A 

J 

11-1 

6A 

J 

12-11-1 

D1 

J 

91 

j 

13 

K 

11-2 

42 

42 

53 

4B 

K 

11-2 

6B 

k 

12-11-2 

D2 

K 

92 

k 

14 

L 

11-3 

43 

43 

54 

4C 

L 

11-3 

6C 

1 

12-11-3 

D3 1 

L 

93 

1 

15 

M 

11-4 

44 

44 

55 

4D 

M 

11-4 

6D 

m 

12-llrv4 

D4 

M 

94 

m 

16 

N 

11-5 

45 

45 

56 

4E 

N 

11-5 

6E 

n 

12-11-5 

D5 

N 

95 

n 

17 

O 

11-6 

46 

46 

57 

4F 

O 

11-6 

6F 

o 

12-11-6 

D6 

O 

96 

o 

20 

P 

11-7 

47 

47 

60 

50 

P 

11-7 

70 

p 

12-11-7 

D7 

P 

97 

p 

21 

Q 

11-8 

50 

50 

61 

51 

Q 

11-8 

71 

q 

12-11-8 

D8 

Q 

98 

q 

22 

R 

11-9 

51 

51 

62 

52 

R 

11-9 

72 

r 

12-11-9 

D9 

R 

99 

r 

23 

S 

0-2 

22 

62 

63 

53 

S 

0-2 

73 

s 

11-0-2 

E2 

S 

A2 

s 

24 

T 

0-3 

23 

63 

64 

54 

T 

0-3 

74 

t 

11-0-3 

E3 

T 

A3 

t 

25 

U 

0-4 

24 

64 

65 

55 

U 

0-4 

75 

u 

11-0-4 

E4 

U 

A4 

u 

26 

V 

0-5 

25 

65 

66 

56 

V 

0-5 

76 

V 

11-0-5 

E5 

V 

A5 

V 

27 

w 

0-6 

26 

66 

67 

57 

w 

0-6 

77 

w 

11-0-6 

E6 

W 

A6 

w 

30 

X 

0-7 

27 

67 

70 

58 

X 

0-7 

78 

X 

11-0-7 

E7 

X 

A7 

X 

31 

Y 

0-8 

30 

70 

71 

59 

Y 

0-8 

79 

y 

11-0-8 

E8 

Y 

A8 

y 

32 

Z 

0-9 

31 

71 

72 

5A 

z 

0-9 

7A 

Z 

11-0-9 

E9 

Z 

A9 

Z 

33 

0 

0 

12 

00 

20 

30 

0 

0 

10 

DLE 

12-11-9-8-1 

F0 

0 

10 

DLE 

34 

1 

1 

01 

01 

21 

31 

1 

1 

11 

DC1 

11-9-1 

FI 

1 

11 

DC1 

35 

2 

2 

02 

02 

22 

32 

2 

2 

12 

DC2 

11-9-2 

F2 

2 

12 

DC2 

36 

3 

3 

03 

03 

23 

33 

3 

3 

13 

DC3 

11-9-3 

F3' 

3 

13 

TM 

37 

4 

4 

04 

04 

24 

34 

4 

4 

14 

DC4 

11-9-4 

F4 

4 

3C 

DC4 
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CODE D (default) 


CODE E, 


I 1 


CODE I 


CODE A 
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HEXADECIMAL-OCTAL CONVERSION TABLE 



First 

0 

hlexadi 

1 

scimal 

2 

Digit 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

Second 0 

000 

020 

040 

060 

100 

120 

140 

160 

200 

220 

240 

260 

300 

320 

340 

360 

Hexadecimal — 

Digit 1 

001 

021 

041 

061 

101 

121 

141 

161 

201 

221 

241 

261 

301 

321 

341 

361 

2 

002 

022 

042 

062 

102 

122 

142 

162 

202 

222 

242 

262 

302 

322 

342 

362 

3 

003 

023 

043 

063 

103 

123 

143 

163 

203 

223 

243 

263 

303 

323 

343 

363 

4 

004 

024 

044 

064 

104 

124 

144 

164 

204 

224 

244 

264 

304 

324 

344 

364 

5 

005 

025 

045 

065 

105 

125 

145 

165 

205 

225 

245 

265 

305 

325 

345 

365 

6 

006 

026 

046 

066 

106 

126 

146 

166 

206 

226 

246 

266 

306 

326 

346 

366 

7 

007 

027 

047 

067 

107 

127 

147 

167 

207 

227 

247 

267 

307 

327 

347 

367 

8 

010 

030 

050 

070 

,410 

130 

150 

170 

210 

230 

250 

270 

310 

330 

350 

370 

9 

Oil 

031 

051 

071 

111 

131 

151 

171 

211 

231 

251 

271 

311 

331 

351 

371 

A 

012 

032 

052 

072 

112 

132 

152 

172 

212 

232 

252 

272 

312 

332 

352 

372 

B 

013 

033 

053 

073 

113 

133 

153 

173 

213 

233 

253 

273 

313 

333 

353 

373 

C 

014 

034 

054 

074 

114 

134 

154 

174 

214 

234 

254 

274 

314 

334 

354 

374 

D 

015 

035 

055 

075 

115 

135 

155 

175 

215 

235 

255 

275 

315 

335 

355 

375 

E 

016 

036 

056 

076 

116 

136 

156 

176 

216 

236 

256 

276 

316 

336 

356 

376 

F 

017 

037 

057 

077 

117 

137 

157 

177 

217 

237 

257 

277 

317 

337 

357 

377 

Octal 

000- 

037 

040- 

077 

100- 

137 

140- 

177 

200 - 

237 

240- 

277 

300- 

337 

340 - 

377 
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ASSEMBLY-TIME I/O 


B 


SCOPE 2 

COMPASS 3 under SCOPE 2 uses the Record Manager for all of its I/O operations. Thus, COMPASS 3 
can read and write files with a variety of external formats. For each of the files used by COMPASS, 
the default format, and the combinations of file format description parameters that may be specified in 
FILE control statements to override the defaults, are given below. 


Main Source Input File 

The main source input file may be a normal source input file or a compressed compile file; COMPASS 
determines which it is by inspecting the data in the file. A normal source input file under SCOPE 2 
comprises the following: 


File Organization (FO) 

Block Type (BT) 

Maximum Block Length (MBL) 
Record Type (RT) 

Maximum Record Length (MRL) 
Conversion Mode (CM) 

Label Type (LT) 


sequential (SQ) 

unblocked 

none 

control word (W) 
100 chars. 

NO 

unlabeled (UL) 


The only other formats that may be specified by FILE control statements are as follows (X=allowed, 
-=not allowed): 


Block 

Type 

Record Type 

F 

w z 

unblocked 

X 

X - 

C 

X 

X X 

I 

— 

X - 


File Organization (FO) must be sequential (SQ). 

Maximum Record Length (MRL) must not exceed 160 characters. 

Label Type (LT) may be any value supported by the operating system. 

Although the maximum record length may be as large as 160 characters, only the first 90 char¬ 
acters of each record are reproduced in the listing output files. 
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If the file is a compressed compile file (written by UPDATE in X mode or MODIFY! in A mode), 
COMPASS sets the file format description parameters to resemble normal input; however, MRL = 
5120 characters. 


Listing Output Files 

The default format under SCOPE 2 comprises the following: 


File Organization (FO) 

Block Type (BT) 

Maximum Block Length (MBL) 
Record Type (RT) 

Maximum Record Length (MRL) 
Conversion Mode (CM) 

Label Type (LT) 


sequential (SQ) 

unblocked 

none 

control word (W) 
137 chars. 

NO 

Unlabeled (UL) 


The only other formats that may be specified by FILE control statements are as follows (X=allowed, 
-=not allowed): 


Block 

Type 

Record Type 

F 

W Z 

unblocked 

X 

X - 

C 

X 

X X 

I 

— 

X - 


File Organization (FO) must be sequential (SQ). 

Maximum Record Length (MRL) must not exceed 137 characters. 
Label Type (LT) may be any value supported by the operating system. 


Binary Output File 

FILE control statements can be used under SCOPE 2 to specify the format of binary output files for any 
of the operating systems, such that a program can be assembled under SCOPE 2 and the object program 
executed under a different system if so desired. 


tMODIFY is not available under SCOPE 2. 
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File Characteristics 


NOS and NOS/BE 1 


File Organization (FO) 

Block Type (BT) 

Maximum Block Length (MBL) 
Record Type (RT) 

Maximum Record Length (MRL) 
Conversion Mode (CM) 

Label Type (LT) 


SCOPE 2 

sequential (SQ) 

unblocked 

none 

control word (W) 
1,310,710 chars. 
NO 

Unlabeled (UL) 


sequential (SQ) 
character count (C) 

5120 chars. 

system-logical-record (S) 

none 

NO 

ANY 


No other formats are allowed, except that the label type (LT) can be any value supported by the operating 
system used for assembly. The format shown above under SCOPE 2 is the default binary output file format 
under that system. 


Scratch Files 

COMPASS uses two scratch files named ZZZZZRL and ZZZZZRM, when table storage space overflows. 
Regardless of what is specified by FILE control statements, COMPASS sets the file format description 
parameters for these files under SCOPE 2 as follows: 

File Organization (FO) = sequential (SQ). 

Conversion Mode (CM) = NO. 

For file ZZZZZRL: 

Block Type (BT) = unblocked. 

Maximum Block Length = 5120 characters. 

Record Type (RT) = undefined (U) Maximum Record Length = 2550 characters. 

For file ZZZZZRM: 

Block Type (BT) = character count (C), Maximum Block Length = 5120 characters. 

Record Type (RT) = SCOPE logical (S), no Maximum Record Length. 


ALL OPERATING SYSTEMS 

System Text Input Files 

A user library file designated by an S parameter on the COMPASS control statement must have the 
standard library file format for the system on which COMPASS is being used.’f COMPASS uses the 
operating system overlay loader to access these files. 

For a sequential binary (non-library) file designated by a G parameter on the COMPASS control statement, 
the default and permitted formats are the same as those given above for the COMPASS binary output file. 


^Overlay residence in user libraries is not currently supported by NOS. 
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XTEXT Input Files 


A file read by COMPASS when processing an XTEXT pseudo instruction can have any of several formats. 
COMPASS determines the file format (a) by whether the XTEXT pseudo instruction variable field is empty 
and (b) by inspecting the data in the file. 

If the variable field is empty, the File Organization (FO) must be sequential (SQ). COMPASS rewinds the 
file and reads until end of section or a COMPASS END statement is encountered, whichever comes first. 
The default and permitted formats under SCOPE 2 are the same as those given above for the main source 
input file. 

If the XTEXT variable field is non-empty, the file organization can be any of three non-standard types: 

• Record indexed with name index (under SCOPE 2 only). 

• SCOPE 3.3 style random file with name index (not supported under SCOPE 2). 

| • Update or Modify^ random program library file. 

In each case, COMPASS sets the file format description parameters to the appropriate values; no FILE 
control statement is needed. 


The record indexed file organization is actually the word addressable (WA) file organization with a set of 
format conventions superimposed on it. Such a file can be created by a FORTRAN program by using the 
library subroutines OPENMS, STINDX, WRITMS, and CLOSMS with a name index, or by a COBOL program 
| specifying ORGANIZATION IS WORD-ADDRESS, WORD-ADDRESS IS data-name. When COMPASS detects 
such a file under SCOPE 2, it sets the file format description parameters as follows (no FILE card is 
needed): 

• File Organization (FO) = word addressable (WA). 

• Block Type (BT) = unblocked. 

• Record Type (RT) = control word (W); Maximum Reeord Length (MRL) = 160 characters. 

• Conversion Mode (CM) = NO. 

• COMPASS positions the file at the record pointed to by the index entry containing the name given in 
the XTEXT statement variable field, and then reads records sequentially until end of section or a 
COMPASS END statement is encountered, whichever comes first. 

The SCOPE 3.3 style random file with name index is permitted for compatibility with previous versions of 
COMPASS. When COMPASS detects such a file, it searches the file index and positions the file at the 
beginning of the specified section, and then reads sequentially until end of section or a COMPASS END 
statement is encountered, whichever comes first. Such files cannot be used with SCOPE 2. 

| An Update or Modify^ random program library file is processed similarly. The name in the variable field of 
the XTEXT statement must be the name of a common deck. When COMPASS detects such a file under 
SCOPE 2, it sets the file format description parameters as follows (no FILE control statement is needed): 


I 


^Modify is not available under SCOPE 2 or NOS/BE 1. 
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File Organization (FO) = word addressable (WA). 

Block Type (BT) = unblocked 

Record Type (RT) = control word (W), Maximum Record Length (MRL) = 5120 characters 
Conversion Mode (CM) = NO 


COMPASS positions the file at the first card image of the designated section (common deck). For 
an UPDATE program library, the first active card image (the *COMDECK card) is skipped. 
COMPASS then reads card images sequentially, ignoring inactive card images, until end of section 
or a COMPASS END statement is encountered, whichever comes first. 


60492600A 


B-5 





BINARY CARD FORMATS 


C 


Column 1 


7, 8,9 levels 0 to 16 

6.7.9 

6.7.8.9 or 7, 8,9 level 17 

7.9 

7 and 9 not both in column 1 


End-of-section 
End-of-partition (NOS only) 
End-of-informatLon 
Binary card 
Coded card 


12 

11 

0 

1 

2 

3 

4 

5 

6 

7 

8 
9 


1 2 3 4 5 



Checksum Modulo 4095 






! 




unused 
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o 

x> 

55 

o 










Word Count 





^ r j. 








Column Binary miormation 




































0) 

CG 

. 3 










-4-» 

S 

Card 

Sequen 



























M 





. 





A binary card can contain up to 15 60-bit CPU words starting at column 3. Column 1 also contains 
a count of 60-bit words in rows 0, 1, 2, and 3plus a check indicator in row 4. If row 4 of column 1 is 
zero, column 2 is used as a checksum for the card on input; if row 4 is one, no check is performed on 
input. 

Column 78 of a binary card is not used, and columns 79 and 80 contain a binary serial number. If a 
section is punched, each card has a checksum in column 2 and a serial number in columns 79 and 80, 
which sequences it within the logical record. 
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HINTS ON USING COMPASS 


D 


1. Within a macro definition: 

• Use comment statements having * in column one. These are not saved, whereas other types of 
comments are saved. 

• Whenever possible, minimize the number of lines of code. 

• IRP is faster than either ECHO or DUP. 

• Use the substitute parameter flags ;A, ;B, and so forth, for macros, to avoid a second line. 

• Within macros, use symbols such as .1, .2, and so forth, instead of local symbols. 

• If possible, avoid recursive macro structure to increase assembly speed. 

• If a macro call is the cause of an error, direct full list output to a file other than OUTPUT 
(L=filename) to obtain a list of the erroneous macro call with the error listing. 

2. In IF sequences: 

• Use line counts rather than ENDIF to terminate sequences. 

• Use SKIP rather than IFPP to skip code. 

3. Macros: 

• Micro replacement is time-consuming. 

• Avoid using local symbols for micros. 

• Use f f for a null substitution. 

4. Minimize SYSTEXT size. 

5. To reduce core requirements, use SEG statements in absolute programs. 

6. Use NOREF for symbols for which listing is not required. 

7. Use QUAL for all overlays. 

The program EXAMPLE (figure D-l) presents fundamental program organization. It also demonstrates 
some COMPASS coding conventions and illustrates efficient coding practice. The program obtains numbers 
from six successive locations, adding the numbers one at a time to the running sum. The total is then 
printed with a label. 
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Figure D-l. Example COMPASS Program 





One of the main considerations in assembly language programming is the reduction of execution time. The 

instruction repertoire of COMPASS often allows an operation to be coded in several ways. The 

programmer, therefore, should give careful consideration to the instructions used in the program to 

perform specific functions. 

• Line 1. The IDENT pseudo instruction is always the first instruction in a program. It specifies a 
program name (EXAMPLE, in this case) to identify the program to the assembler. 

• Line 2. The ENTRY pseudo instruction declares the point in the program at which execution is to 
begin. The main entry point in a program is the control transfer address. 

• Line 3. The BSS instruction establishes the output buffer OBUF. The programmer has allocated 
301g words of storage for the buffer, as shown in the assembled octal code listed to the left of the 
source code. Note that the octal code format for the pseudo instructions will differ from the format 
for the symbolic machine instructions because pseudo instructions do not have single machine 
instruction equivalents. 

• Line 4. The operating system macro FILEC is called to create a file environment table (FET) for the 
output buffer. Only the first word of the FET is shown in the octal code, but examination of the 
location addresses reveals that the table is actually five words in length (the minimum length of a 
FET). For more information about FETs, see the appropriate operating system reference manual. 

• Line 5. The first executable line of code has been designated the main entry point for the program. 
Incrementing by one occurs so often within a program that it has become a COMPASS coding 
convention for register B1 to always be initialized to one, and to remain one throughout the entire 
program. This is particularly important during the use of the common common decks (chapter 12), and 
can be a factor in execution time (see Bl=l pseudo instruction) as well as in assembly time. 

• Line 6. A counter is initialized to zero by setting the contents of a B register (chapter 8) equal to the 
contents of the BO register. BO is hard-wired to zero, thereby avoiding the need for repeated 
processing of the literal Or constant zero. 

• Line 7. Comparing the octal code for lines 6 and 7, the programmer can see the difference between 
two forms of register-setting instructions. The 15-bit form of the instruction is used in line 6, where 
only three bits are required to represent the BO register as the source of an operand. The 30-bit form 
of set B register instruction is required for line 7, where the constant 6 is represented by the lower 18 
bits of the instruction. 

• Line 8. The mask instruction is normally used to extract fields from a register. Here, it is used 
instead of the slower set X register instruction to initialize an X register. 

Another important feature of COMPASS is illustrated here. The octal code seems to indicate that the 
lower 15 bits of the current word in memory have been left blank. This is the result of a force upper. 
The next instruction is too large to fit in the remaining 15-bit parcel, so COMPASS packs that parcel 
with a no-operation instruction. The next instruction is placed at the beginning of the next word (see 
section 8.1). 

• Line 9. The use of the set A register instruction to obtain a word of data is demonstrated here. As 
seen in the octal code, the address of the word (32 lg) is placed in the specified A register. The data 
itself is placed in the corresponding X register (X2 in this instance). (See section 8.4.45.) 

The plus sign (+) after the octal code indicates that the address or K portion of the instruction (the 
lower 18 bits in this case) is relocatable. 

• Line 10. The 15-bit format of the set B instruction is illustrated here. The first six bits contain the 
operation code for the instruction (66g in this instance). The next three bits designate the 
destination register (B2) for the results of the instruction. The next three bits indicate the register 
containing the first source operand (B2). The final three bits indicate the source register for the 
second source operand (Bl). 
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• Line 11. The number obtained in the previous instruction is added to the running sum kept in XI. This 
is a 60-bit add instruction, as opposed to the SXi instruction, which adds only 18-bit operands. 

• Line 12. The NE instruction shows another use of the B registers in testing for a conditional branch. 

In each iteration of the loop, the source operands are compared. While they are unequal, control is 
transferred from this instruction back to LOOP. When the operands become equal, control passes to 
the next instruction. 

• Line 13. The return jump (RJ) instruction is used here to access a common common deck, 

COMCCDD, as a relocatable subroutine. The programmer has taken advantage of the COMPASS 
default method of defining external symbols. The =X indicates to the assembler that CDD, the entry 
point to the subroutine, is external to EXAMPLE. 

The use of common common decks is important to the programmer. Note that the decks require 
certain entry conditions. Specific arguments are expected to be in certain registers, for example, 
upon entry to the routines. An efficient program will establish these conditions with a minimum of 
data transfers by using the registers judiciously prior to the call. COMCCDD, for example, converts 
an octal word to decimal display code; that word is expected to be in register XI. For this reason, the 
running total has been kept in XI, avoiding the need for extra data transfers. 

• Line 14. The method of storing an operand in memory is illustrated here. Setting register A6 or A7 
to a valid address causes the contents of X6 or X7, respectively, to be stored in the address specified. 
When COMCCDD has converted the word, it places the result in register X6, ready for storage upon 
return to the calling routine. 

• Line 15. Another method of accessing a common common deck is shown here. A call is made to a 
system macro, WRITEH, which utilizes the common common deck COMCWTH to write a line from a 
working buffer to an output buffer. 

• Line 16. A call is made to the operating system macro WRITER to write the contents of the buffer 
OBUF (with which the system communicates through the FET OUTPUT) to the system default output 
file, also named OUTPUT. (For more information about operating system macros, see the appropriate 
operating system reference manual.) 

• Line 17. Another operating system macro, ENDRUN, is called to terminate program execution. 

• Lines 18 through 23. DATA pseudo instructions are used here to establish a table comprising six 

consecutive words in memory, starting at location TABLE. The default base mode is base 10 in 
COMPASS (see section 4.4.1). 

• Line 24. DATA is used here to set in memory a display-coded image of the characters specified, for 

use in the output line. Ten 6-bit characters can be stored per word in this fashion. Therefore, more 
than one word is required here, as seen from the location address on the next line. 

• Line 25. One word of memory is reserved for the final sum. This word is labeled ANS. Note that this 

word is not initialized by the BSS instruction. 

• Line 26. The symbol LEN is equated with the value of the origin counter minus the address of 
WORDS. This yields the length of the output line specified in line 15. 

• Line 27. The SST instruction ensures that symbols from the system texts used by the program are 
defined. 

• Lines 28 through 31. These XTEXT pseudo instructions tell COMPASS to search the system-defined 
program library OPL for the common common decks named. Declarations of this type are normally 
grouped together after the end of the executable code for easy reference. 

• Line 32. The END instruction signifies the end of the program. Control is released through the 
transfer address at BEGIN. 
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The dayfile for the program is shown in figure D-2. It shows how the COMPASS program library was 
obtained from a tape with the LABEL command and converted to a random access file via Update. 


ACLAAFO. 80/04/15.(22) SVL SN112 NOS. 

08.19.43.EXAMPLE. 

08.19.43.UCCR> 7631, 0.051KCDS. 

08.19.43. USER statement. 

08.19.43. CHARGE statement. 

08.19.43.COMMENT. GET COMMON COMMON DECKS FROM C 
08.19.43.OMPASS PROGRAM LIBRARY. 

08.19.43.LAB EL,CPL>R> D»HI»F*SI»PQ*URM>VSN*GU1066, 
08.24.10.MT53, ASSIGNED TO CPL , VSN*0U1066. 
08.24.10.UPDATE,A,P»CPL,N*RNCPL,L“OUTPUT. 
08.24.29. UPDATE COMPLETE. 

08.24.29.UNLOAD,CPL. 

08.24.30.C0HPASS(S,S«IPTEXT,S»CPUTEXT,X»RNCPL,0> 
08.24.31. ASSEMBLY COMPLETE. 51200B CM USED. 
08.24.31. 0.237 CPU SECONDS ASSEM8LY TIME. 

08.24.31.LG0. 

08.24.32.UEAD, 0.003KUNS. 

08.24.32.UEPF, 0.041KUNS. 

08.24.32.UENT, 1.422KUNS. 

08.24.32.UEMS, 12.879KUNS. 

08.24.32.UECP, 2.031SECS. 

08.24.32.AESR, 9.912UNTS. 

08.37.30.UCLP, 7635, 0.448KLNS. 


Figure D-2. Dayfile of Program EXAMPLE 
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DAYFILE MESSAGES 


E 


The dayfile messages that can be issued by COMPASS are listed in table E-l. 

The following message, with xxxxxxx denoting the name of the subprogram being assembled, is displayed at 
the system operator’s console only; it is not written to the dayfile. COMPASS updates the display when¬ 
ever it processes an IDENT statement with a non-blank variable field. 

ASSEMBLING xxxxxxx 
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TABLE E-l. DAYFILE MESSAGES 


Message 

Significance 

Action 

ASSEMBLY ABORTED - ECS READ ERROR. 

This message can occur only when 
the job has an ECS field length and 
is used on a CYBER 170 or CYBER 
70/Model 71, 72, 73, or 74. COM¬ 
PASS may store some of its inter¬ 
nal tables in ECS. When an ECS 
error persists through four at¬ 
tempts to read the data, the mes¬ 
sage is issued, and the job is 
aborted. For the CYBER 70/ 

Model 76, LCM errors are hand¬ 
led by the operating system. 

Rerun job. If con¬ 
dition persists, con¬ 
tact a system 
analyst. 

ASSEMBLY ABORTED - ECS WRITE ERROR. 

This message can occur only when 
the job has an ECS field length and 
is used on a CYBER 170 or CYBER 
70/Model 71, 72, 73, or 74. COM¬ 
PASS may store some of its inter¬ 
nal tables in ECS. When an error 
occurs in writing data to ECS, no 
retry attempt is made. The mes¬ 
sage is issued, and the job is 
aborted. For the CYBER 70/Model 
76, LCM errors are handled by the 
operating system. 

Rerun job. If con¬ 
dition persists, con¬ 
tact a system 
analyst. 

ASSEMBLY ABORTED - PASS n TABLE 
OVERFLOW ASSEMBLING xxxxxxx 

While processing the program indi¬ 
cated by xxxxxxx, an irrecoverable 
table overflow condition has occur¬ 
red in assembly pass n (1 or 2). 
COMPASS allocates memory space 
dynamically to all of its internal 
tables. If one table overflows, they 
all do. When the tables do not fit 
in the available SCM space, COM¬ 
PASS will request additional cen¬ 
tral memory up to a threshold at 
which time the intermediate file 
and cross-references are dumped 
to mass storage scratch files. If 
table space is still inadequate, 
COMPASS will request additional 
central memory up to the maxi¬ 
mum available to the job. When 
insufficient SCM exists after all 
such possibilities have been ex¬ 
hausted, COMPASS issues the 
message and aborts the job. 

Rerun job inserting 
an RFL statement 
specifying suffi¬ 
cient field length to 
assemble. 
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TABLE E-l. DAYFILE MESSAGES (Cont'd) 


Message 

Significance 

Action 

ASSEMBLY COMPLETE. nnnnnnB |g^ M } USED. 

If COMPASS did not detect any 
fatal errors during assembly, 
this message is issued at the 
completion of processing of all 
source programs on the input 
file. The minimum field length ~ 
needed to perform the assem¬ 
blies successfully is the octal 
number of SCM words, nnnnnn. 

If this number is larger than the 
actual field length, it is the 
minimum field length needed to 
avoid lost references. The 

No action required. 

xxxx.xxx CPU f SECONDS ASSEMBLY TIME. \ 
(SEC. nnnnnnB (lcm) used *^ 





second line of the message can 
be suppressed by an installation 
parameter; xxxx.xxx represents 
the total central processor time 
used by COMPASS, in seconds to 
three decimal places. If any 
ECS/LCM space was assigned to 
the job, nnnnnn is the octal num¬ 
ber of words used. 


ASSEMBLY ERRORS. nnnnnnB { scjvi} USED. 

If COMPASS detected at least 

Correct the fatal 

one fatal error during assembly, 

errors and 

xxxx.xxx CPU (SECONDS ASSEMBLY TIME. 

(SEC.nnnnnnB <lcM ) USED -f 

this message is issued at the 
completion of processing of all 

reassemble. 


source programs on the input 
file. If the A option was speci¬ 
fied on the COMPASS control 



statement, the job is aborted 
after this message is issued. The 
minimum field length need to 
perform the assemblies success¬ 
fully is the octal number of SCM 
words, nnnnnn. The second line 
of the message can be suppressed 
by an installation parameter; 
xxxx.xxx represents the total 
central processor time used by 
COMPASS, in seconds to three 
decimal places. If any ECS/LCM 
space was assigned to the job, 
nnnnnn is the octal number of 



words used. 


BAD CONTROL STATEMENT ARGUMENT - xx 

The COMPASS control state- 

Refer to chapter 10 


ment contains an unrecognized 

of this manual to 


or invalid argument. The 

correct the COM- 


offending argument is named in 

PASS control 


the message. 

statement. 
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TABLE E-l. DAYFILE MESSAGES (Cont’d) 


Message 

Significance 

Action 

CANT LOAD COMP3$ 

The operating system loader 
reported a fatal error when 
COMPASS attempted to load its 
primary overlay. This message 
should be preceded by an explan¬ 
atory message from the loader. 

Refer to the loader 
diagnostics in the 
loader reference 
manual for informa¬ 
tion about the 
specific loader 
error. 

COMPASS NEEDS AT LEAST nnnnnB SCM. 

The SCM field length for the 
job is too small for COMPASS. 
The number of octal words 
needed by COMPASS before it 
can begin processing is nnnnnn. 
This number varies depending on 
the version of COMPASS used 
and the listing and binary out¬ 
put options specified on the 
control statement. It is an abso¬ 
lute minimum number of words; 
it does not include whatever 
space may be required for 
system text, local macro and 
micro definitions, and so forth. 

Rerun job inserting 
an RFL statement 
specifying suffi¬ 
cient field length. 

nnnnnnnnn ERRORS IN xxxxxxx 

COMPASS issues this message 
for each source program in 
which fatal errors are detected; 
nnnnnnnnn is the number of 
errors, and xxxxxxx is the sub¬ 
program name. 

Correct the fatal 
errors and 
reassemble. 

FILE USE CONTRADICTION. 

Control statement specifies 
the same file name for two or 
more of the following: 

Correct contra¬ 
diction. 


- Source input 

- List output (full or short 
list) 

- Binary output 

- XTEXT source 


IDENT STATEMENT MISSING. 

.. 

COMPASS issues this message 
for each source program in 
which an END statement is en¬ 
countered before an IDENT 
statement is found. This is a 
fatal error. 

Correct the source 
program to include 
an IDENT and END 
statement for each 
subprogram. 

IMPROPER SYSTEM TEXT FORMAT. 

BAD SYSTEM TEXT - x=yyyyyyy/zzzzzzz 

A system text overlay does not 
have the internal format 
required by this version of 
COMPASS. This may be caused 

Correct the inter¬ 
nal format of the 
system text 
overlay. 
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TABLE E-l. DAYFILE MESSAGES (Cont'd) 


Message 

Significance 

Action 


by a system error. COMPASS 
ignores the bad overlay but does 
not abort the job. The expres¬ 
sion, x=yyyyyyy/zzzzzzz,iden¬ 
tifies the offending overlay in 
the same form in which it is 
specified in the COMPASS con¬ 
trol statement; it may be any of 
the following: 

- G=filenam 

- G=filenam/overlay 

- S=overlay 

- S=library/overlay 


INPUT FILE EMPTY OR MISPOSITIONED. 

. 

When attempting to read the 
first line from the source input 
file, COMPASS encountered end 
of data and aborted. 

Correct the name 
of the source input 
file or reposition 
the file. 

INSUFFICIENT STORAGE FOR SYSTEM TEXT. 
BAD SYSTEM TEXT - x=yyyyyyy/zzzzzzz 

When an irrecoverable table 
overflow occurs, COMPASS 
issues this message before 
the first assembly is begun. It 
does not abort the job. The 
expression, x=yyyyyyy/zzzzzzz, 
identifies the system text being 
loaded at the time. 

Increase the SCM 
field length for the 
job. 

nnnnnnnnn LOST REFERENCES IN xxxxxxx 

The symbolic cross-reference 
table is sorted before it is 
printed. If the table does not fit 
in the job's SCM field length 
for sorting, COMPASS discards 
some of the references. A 
message is issued; nnnnnnnnn is 
the number of references 
discarded, and xxxxxxx is the 
subprogram name. The job is not 
aborted. The ASSEMBLY COM¬ 
PLETE message gives the field 
length needed to avoid lost 
references. 

Increase the SCM 
field length for the 
job. 

MORE THAN 7 SYSTEM TEXTS SPECIFIED. 

COMPASS issues this message 
and aborts the job, when the G 
and S parameters on the COM¬ 
PASS control statement specify 
a total of more than seven 
system text overlays. 

Restructure the job 
to reduce the num¬ 
ber of system text 
overlays required. 

N PARAMETER OBSOLETE, IGNORED. 

The N parameter has been 
obsoleted by the BL parameter. 

Remove the N 
parameter from 
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TABLE E-l. DAYFILE MESSAGES (Cont’d) 


Message 

Significance 

Action 



the control state¬ 
ment. 

NO CONTROL STATEMENT TERMINATOR. 

Before finding a parenthesis or 
period not in a $-delimited 
string, COMPASS read continua¬ 
tion control statements and 
encountered an end-of-section. 
This is not a fatal error. 

Correct the con¬ 
trol statement. 

RECURSION DEPTH EXCEEDED 400. 

COMPASS maintains a push¬ 
down stack for source input con¬ 
trol. This stack has one entry 
for each active DUP, ECHO, 
HERE, XTEXT, or macro call. 

The maximum depth of the 
stack is set by an installation 
parameter; it is 400 in the 
released system. When this 
limit is exceeded, COMPASS 
sets a fatal error and clears the 
staek. The next statement can 
then be read from the source 
input file. The job is not aborted. 
This error is usually caused by a 
source program in which a 
macro calls itself indefinitely. 

Correct the macro 
call program error. 

SYSTEM TEXT NOT FOUND. 

BAD SYSTEM TEXT - x=yyyyyyy/zzzzzzz 

When it cannot load the system 
text overlay identified by 
x=yyyyyyy/zzzzzzz, COMPASS 
issues this message. It does not 
abort the job. For an overlay 
loaded from a library file (S 
parameter), this message 
should be preceded by an 
explanatory message from the 
operating system loader. For an 
overlay loaded from a non- 
library file (G parameter), 
COMPASS could not find the 
overlay on the file. 

For an overlay 
loaded from a 
library file, refer 
to the diagnostics 
in the loader refer¬ 
ence manual. For 
an overlay loaded 
from a non-library 
file, check that the 
overlay name is 
specified correctly 
and that the over¬ 
lay is located on 
the file. 

nnnnnnnnn WARNING MESSAGES IN xxxxxxx 

COMPASS issues this message 
for each source program in 
which nonfatal errors are de¬ 
tected; nnnnnnnnn is the number 
of errors, and xxxxxxx is the 
subprogram name. 

Correct the non¬ 
fatal errors and re¬ 
assemble. 
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GLOSSARY 


F 


ABSOLUTE BLOCK - A block of object code generated in an absolute assembly. The ABS pseudo 

instruction is used to declare a program absolute. 

ASSEMBLER - A computer language that prepares an executable program from a source 

language program by substituting machine operation codes for symbolic operation 
codes and absolute or relocatable addresses for symbolic addresses. 

BLANK COMMON BLOCK - 

A common block into which no data is stored at load time. The first declaration 
of a blank common block need not be the largest declaration for the common 
block. 

A grouping of words of object code or storage within a subprogram for a 
specific purpose. 

A relocatable collection of one or more programs bound together in a special 
format that allows the programs to be loaded and unloaded dynamically to form 
an executing program by the Fast Dynamic Loading facility. 

UNIT (CPU) - 

The high-speed arithmetic unit that performs the addition, subtraction, 
multiplication, division, incrementing, logical operations, and branching 
instructions needed to execute programs. 

A statement providing documentary information for a section of code. Comment 
lines are indicated by either an asterisk in column 1 or blanks in columns 1 
through 29, and are listed but not otherwise processed by the assembler. 

The field in a COMPASS statement providing documentary information for the 
statement. It is listed but not otherwise processed by the assembler. This 
field begins with the first nonblank character following the variable field, or 
in column 30 if the variable field is blank. 

An area of memory that can be declared by more than one subprogram and used 
for storage of shared data. 

An expression element consisting of a value represented in octal, decimal 
hexadecimal, or character notation. 

A type of character or numeric value that can be used in subfields of the DATA 
and LIT instructions, and as specifications of field lengths on VFD pseudo 
instructions. 

ENTRY POINT - A location within a subprogram that can be referenced from other subprograms. 

Each entry point has a name with which it is associated. 

EXTERNAL REFERENCE - 

A reference in one subprogram to an entry point in another subprogram. 

FORCE UPPER - To guarantee that an instruction begins on a word boundary by packing the 

parcels remaining in a partially completed word with no-op instructions and 
beginning to assemble the specified instruction in the next word. The assembler 


BLOCK - 

CAPSULE - 

CENTRAL PROCESSOR 

COMMENT LINE - 

COMMENTS FIELD - 

COMMON BLOCK - 

CONSTANT - 

DATA ITEM - 
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automatically forces upper in some cases, and the user program can specify 
that a given instruction be forced upper. 

LABELED COMMON BLOCK - 

A common block into which data can be stored at load time. The first program 
declaring a labeled common block determines the amount of memory allocated. 

LINKING - The process of matching external references to entry points of the same names 

and inserting the addresses of the entry points into the external references. 

LITERAL - A read-only constant. Conventionally, it is the only element in an expression. 

Literals are stored in the program's literals block to avoid duplication of 
read-only data. 

LITERALS BLOCK - A block of literal data entries local to a subprogram. 

LOAD SEQUENCE - One or more consecutive control statements processed by the loader as a 

unit. A load sequence can be a single name call statement, or it can consist 
of loader statements (such as LOAD and LDSET) that are terminated by NOGO, 
EXECUTE, or a name call statement. 

LOCAL BLOCK — A storage area defined by a USE or USELCM pseudo instruction. 

LOCATION COUNTER - Normally the same as the origin counter. Can be reset by the programmer to 

relocate code or data without affecting relative positions within the block. 

LOCATION FIELD - The first field in a COMPASS statement, usually providing a name for the 

address of the instruction or for the entity defined by the statement. The 
location field begins in column 1 or 2. 

MACHINE INSTRUCTION - 

A string of bits capable of being interpreted directly by a central processor 
or peripheral processor as an instruction to perform some operation. 

MACRO - A sequence of source statements that are saved and then assembled whenever 

needed through a macro call. 

MICRO - • A character string identified by a symbolic name. Wherever the name is 

encountered in the program, the character string is substituted. 

OPDEF - A sequence of source statements that are saved and then assembled whenever 

needed through an opdef call. Differs from a macro in that the assembler 
interprets the call by examining the format or syntax of the instruction rather 
than the contents of the operation field alone. 

OPERATION CODE - A mnemonic operator, used in the operator field of a COMPASS statement, 

to indicate a specific machine instruction. 

OPERATION FIELD- The field in a COMPASS statement indicating the operation to be performed. It 

begins with the first nonblank character following the location field; or, if the 
location field is blank, it begins with the first nonblank character after column 

2 . 

ORIGIN COUNTER - A pointer indicating the relative location of the next word to be assembled or 

reserved in a given block. 
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OVERLAY - One or more relocatable programs that were relocated and linked together into 

a single absolute program. 

PARCEL - One of the 15-bit sections of a central memory word. A CPU machine instruc¬ 

tion occupies one, two, or four parcels. 

PERIPHERAL PROCESSOR UNIT (PPU) - 

An individual computer with its own memory, used for high-speed transfer of 
information (input and output) between peripheral devices and central memory. 

POSITION COUNTER - 

A pointer indicating the bit position within the word of the next item to be 
assembled in a given block. 

PROGRAM - One or more subprograms capable of being executed as a unit. 

PSEUDO INSTRUCTION - 

An assembler-defined instruction appearing in the operation field of a statement. 
It normally does not specify the assembly of a single machine instruction, but 
instead specifies some other assembly process (such as symbol definition, 
listing control, and so forth.) 

QUALIFIED SYMBOL - A symbol defined when a qualifier is in effect during assembly. Through 

qualification, the same symbol can be referred to in different subprograms 
without conflict. 

REFERENCE ADDRESS (RA) - 

The first word in the field length of a job. Because of dynamic relocation, the 
RA frequently changes with respect to the first word in central memory; but it 
always remains the same with respect to other addresses within the job's 
field length. 

REGISTER - A unit within the central processor used to hold operands. The A registers 

contain the addresses of words within central memory; the X registers contain 
operands used in calculations; the B registers are used for incrementing and 
indexing. 

RELOCATION - Placement of object code into central memory in locations that are not pre¬ 

determined, and adjusting the addresses accordingly. 

REMOTE ASSEMBLY - An operation in which code is assembled, saved, and then inserted into the 

object code when specified. 

STRONG EXTERNAL - An external reference whose satisfaction is obligatory for program loading. 

SUBPROGRAM - A group of COMPASS statements beginning with an IDENT pseudo instruction 

and ending with an END pseudo instruction. 

SYMBOL - A set of characters that identifies a value and its associated attributes. 

SYSTEM TEXT - A set of tables containing symbol, micro, macro, and opdef definitions that 

can be saved on a file to be accessed by other programs. 

TRANSFER ADDRESS - The address of the entry point to which the loader jumps to begin program 

execution. 


60492600 D 


F-3 



VARIABLE FIELD - 

WEAK EXTERNAL - 

ZERO BLOCK - 


The field in a COMPASS statement identifying operands for the statement. It 
consists of one or more subfields, and begins with the first nonblank character 
after the operation field. 

An external reference that is ignored by the loader during library searching 
and cannot cause any other program to be loaded. A weak external is linked, 
however, if the corresponding entry point is loaded for any other reason. 

The nominal central memory block for a relocatable assembly. It is local to 
a sub-program. Also, a zero block is created for an absolute assembly if 
default symbols are used. 
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A abort mode 10-2 
A code option 4-24 
| A error 11-9 
A list option 4-72 
A reference table option 4-78 
A register 

description 8-7 
designators 2-8 
I setting 8-44 

ABS attribute 4-64 
ABS pseudo 

description 4-6 

example 4-4,7,13,14,16,17,44 
first statement group 4-2 
Absolute block 

absolute program 3-6 
| description 3-2 

establishment 4-30 
relocatable program 3-5 
using 4-30, 31 
Absolute program 
declaration 4-6 
structure 3-6 
Absolute text 3-5 
ACN instruction 9-21 

I 

ADC instruction 

arithmetic function 9-4 
description 9-9 
example 2-20,9 -9 
ADD instruction 

arithmetic function 9-4 
description 9-12 
Add unit 

floating point 8-3, 6,37 
long 8-3, 8-39 
Address modes, PPU 9-1 
Address 

absolute 4-4 
direct 9-12 
entry point 4-4,5,43 
external 4-6, 9,45 
indexed 9-14 
indirect 9-13 
ADI instruction 

arithmetic function 9-4 
description 9-13 
ADM instruction 

arithmetic function 9-4 
description 9-15 
ADN instruction 

arithmetic function 9-4 
description 9-8 
AJM instruction 9-17 


AOD instruction 

description 9-12 
replace function 9-5 
AOI instruction 

description 9-13 
replace function 9-5 
AOM instruction 

description 9-15 
replace function 9-5 
Arithmetic functions, PPU 9-4 
Arithmetic shift 8-32 
Arrow 

parameter separator 5-8,13 
special character 2-4 
ASCII code 

character set A-l 
option 4-25 
Assembler 1-1 

central memory requirements 1-3; 10-1 | 

statistics 4-71; 11-8 
Assembly environment test 4-58 
Assembly listing 

detailed description 11-1 
general description 4-71 
generation 1-3 
Assembly, remote code 5-3 
Assembly time 11-8 
Asterisk 

BASE instruction 4-23 
element operator 2-22 
first column 2-1,2 
local symbol separator 5-31 
location counter 2-9; 3-4 
parameter separator 5-8,13,16,24, 28 
special element 2-9, 32; 3-4 
USE instruction 4-30 
USELCM instruction 4-32 
Attribute, symbol 2-5 
Attribute test 4-64 
AXi instruction 8-30,32 

B base 2-17,18;4-22 
B binary mode 10-2 
B list option 4-72 
B reference table option 4-78 
Bl=l or B7=l pseudo instruction 
description 4-28 
effect on R= 4-53 
example 4-54 
illegal for PPU 4-9,10 
B register 

conditional jumps 8-23 
contents of 4-28 
description 8-7 
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designators 2-8 
| setting 8-46 

Base, assembly 4-22.1 

COL column count 4-29 
DIS word count 4-47 
DUP count 5-6 
ECHO count 5-7 

line count 4-58,59,61, 62,65,67, 68 

micro count 7-2,4 

numeric value 2-16 

overlay level numbers 4-4 

PPU number 4-4 

REP counts 4-55 

| setting through BASE 4-22.2 

SPACE line count 4-74 
string count 2-13 
VFD count 4-51 
BASE micro 7-6 
BASE pseudo 

| description 4-22.2 

example 4-13, 19, 23, 47, 49 
permissible anywhere 4-2 
Binary control statements 4-1, 72; 11-1 
Binary load module 3-8 
Binary mode 10-2 

Binary output generation 1-3; 3-7, 9, 11, 13; 10-2 
| Binary write 3-8 
Blank 

compressed 5-1 
embedded 2-1 
expression terminator 2-1 
name terminator 2-5 
operation field 2-1 
parameter separator 5-8,13 
statement terminator 2-1 
string terminator 2-14 
use in character data 2-14 
| variable field 2-2, 3; 3-8 
Blank card 4-74 
Blank common 
CM 4-30 
description 3-3 
ECS 4-32 

establishment 4-30,32 
example 4-36 
LCM 4-32 
SCM 4-30 
Blank fill 2-14 
DIS 4-47 

Blank operation field 4-45 
Block copy instruction 8-13 
| Block group 3-1, 12, 14 
Block group listing 11-2 
Block 

absolute 3-1; 4-32, 36 
blank common 3-3; 4-32, 34 
labeled common 3-2; 4-30 
| literals 2-11; 3-2, 3-5 thru 15 
local 3-2; 4-30 
maximum number 3-1; 4-30 
origin assigned 1-2; 3-5, 7 
subprogram 3-1 
used for definition operation 5-2 
user established 3-2; 4-30, 32 
zero 3-2; 4-30, 32 


Block name 3-3; 4-30, 32 | 

Block name listed 11-1 

Block origin 1-2; 3-5 

Block usage summary 11-2 

Boolean unit 

description 8-3, 6 

instructions 8-25, 26, 27, 28, 29, 34, 35, 36 | 

Branch instructions 

CPU 8-10, 11, 14, 20, 23 
PPU 9-5 
Branch unit 

description 8-3 

instructions 8-10,11,14, 20,21, 23 
BSS pseudo 

description 4-35 

effect on origin counter 3-3 

example 4-4,7,10,16,28,33, 36, 37,40,44; 

5-22, 32 

force upper 3-4 
BSSZ pseudo 

description 4-46 
dumped by SEGMENT 4-16 
example 2-19; 5-33, 35 
force upper 3-4 
BXi instruction 8-25 thru 8-28 
Byte, guaranteed zero 2-14; 4-48 

C hardware feature code 4-8 
C list option 4-72 
C cm octal listing 11-6 
Call 

equivalenced macro 5-25 
macro 5-18 
opdef 5-29 

CC instruction 8-53 1 

Central memory requirements 1-3, 10-1 § 

Central processor unit 

functional units 8-3,6 
instructions 8-1 
registers 8-7 
Channel buffer instruction 
read status 8-19 
reset input 8-17 
reset output 8-18 
CHAR 

define other character 4-24 
Character codes A-l 
Character data 2-13 

code conversion 4-24 
evaluation 2-27 

examples 2-12,15 _ 

CMU 8-50 I 

Code 

CPU operation 6-7; 8-1 
duplication 5-6 
Code other 4-24 
PPU operation 6-3; 9-1 
remote assembly 5-3 
replication 4-55 
CODE micro 7-6 
CODE pseudo 

description 4-24 

effect on character data 2-13; 4-47 
„ example 4-25 

permissible anywhere 4-2 
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Coding form 2-3 
COL pseudo 

description 4-9 
octal listing 11-6 
Column one 2-1 
COM attribute 4-64 
Comma 

character string 2-13 
column one 2-1 
continuation 2-1 
expression terminator 2-21 
local symbol separator 5-31 
name terminator 2-5 
parameter separator 5-8,13,16,24, 28 
string terminator 2-13 
subfield delimiter 2-1 
COMMENT pseudo 
description 4-20 
example 4-13 
first statement group 4-2 
Comments column control 4-29 
Comments field 2-2, 3; 4-29 
Comments statement 2-2 

heading of definition 5-13 
micros not substituted 7-1 
not counted 4-57; 5-7, 8 
permissible anywhere 4-2 
Comments, prefix table 4-20 
Common common decks 
COMCARG 12-3 
COMCCDD 12-3 
| COMCCFD 12-4 
COMCCRD 12-4 
COMCCIO 12-4 
COMCCOD 12-5 
COMCCPT 12-5 
COMCDXB 12-6 
COMCMNS 12-6 
COMCMOS 12-7 
COMCMTM 12-8 
COMCMTB 12-9 
COMCMVE 12-13 
COMCRDC 12- 13 
COMCRDH 12-14 
COMCRDO 12-14 
COMCRDS 12-15 
COMCRDW 12-16 
COMCRSR 12-16 
COMCSFN 12-17 
COMCSRT 12-17 
COMCSST 12-17 
COMCSTF 12-19 
COMCSVR 12-19 
COMCSYS 12-19 
COMCUPC 12-21 
COMCWOD 12-22 
COMCWTC 12-22 
COMCWTH 12-22 
COMCWTO 12-23 
COMCWTS 12-23 
COMCWTW 12-24 
COMCXJR 12-25 
COMCZTB 12-25 


Compare character strings 4-66 
Compare expression values 4-60 
Compare/Move unit 8-50 
COMPASS call statement 
description 10-2 
effect on LIST 4-77 
Compile file 10- 4 

Comp and log difference instruction 8-30 
Comp and log sum instruction 8-30 
Complement instruction 8-29 
Compressed code 5-1 
CON pseudo 

description 4-52 
example 2-22; 4-53; 5-5, 23,26 
force upper 3-4 
Concatenation 2-4 
Concatenation mark 2-4 
example of use 5-19 
in definition 5-1 
Conditional assembly 4-57 
Conditional jump 
B register 8-23 
PPU 9-5 
X register 8-21 
Configuration 1-3 
Constant 

character 2-14 
description 2-10 
expression element 2-21, 26 
field size 2-11 
generated by pseudo 4-52 
numeric 2-16 
read only 2-11 
Continuation, statement 2-2 

generation of lines 2-4; 7-1 
Control statements 
COMPASS 10-2 
job statement 10-1 

Counters, block control 3-3, 10, 12 
Counter control 
BSS 4-35 
forcing upper 3-4 
LOC 4-36 
ORG 4-33 
ORGC 4-33 
POS 4-38 
USE 4-30 
USELCM 4-32 
CPOP pseudo 6-7 
CPSYN pseudo 

description 6-10 
permissible anywhere 4-2 
CPU instructions 
block copy 8-13 
Boolean 8-25 thru 28, 34, 35, 36 
branching 8-21, 26 
channel buffer 8-17,18 
channel status 8-19 
complement 8-28, 29 
conditional 8-21,23 
direct LCM transfer 8-16 
divide 8-42 

double precision 8-37,40 
ECS 8-12 
error exit 8-11 
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exchange exit 8-15 
exchange jump, 6000 8-14 
fixed point 8-38 

floatingpoint 8-33,36,37,39,40,42 
I increment 8-44, 46, 48 

left shift 8-30, 31 
logical 8-26 thru 31 
long add 8-38 
mask 8-41 
multiply 8-39, 40 

I no operation 8-43 

normalize 8-33 
pack 8-35 
pass 8-43 

I population 8-44 

program stop 8-10 
real-time clock 8-18 
return jump 8-11 
right shift 8-30, 32 
I set register 8-44, 46, 48 

set time 8-18 
shift 8-30 thru 33 
single precision 8-36 
transmit 8-25 
unconditional jump 8-20 
| unpack 8-34 

CPU program execution 1-3; 10-1 
CPU register designators 2-8; 8-7 
CRD instruction 9-16 
Created symbol 5-31; 11-8 
CRM instruction 9-16 
Cross reference table 

(see symbolic reference table) 

_ CTEXT pseudo 4-77 
I CU instruction 8-54 
CWD instruction 9-16 
_ CWM instruction 9-16 
I CXi instruction 8-44 

Dbase 2-17; 4-22.2 
D code option 4-24 
D debug mode 10-3 
D definition flag 11-14 
D error 11-10 

D hardware feature code 4-7 
D list option 4-72 
Data generation 4-45 
Data item 

character format 2-13 
DATA pseudo 4-47 
general description 2-10 
LIT pseudo 4-49 
numeric format 2-17 
VFD pseudo 4-51 
Data notation 

character 2-13 
constant 2-10,13,16 
decimal 2-17 
element 2-10,21 
fixed point 2-17 
floating point 2-17 
hexadecimal 2-21 
item 2-10,13,16 
literal 2-11,13,16 
numeric 2-16 


octal 2-17 
DATA pseudo 

description 4-46 

example 2-15,19,20; 4-25,31,35,47 
force upper 3-4 
Data transmission, PPU 9-3 
DATE micro 7-5 
Date of listing 11-1 
DCN instruction 9-21 

Debug, interactive 1-4 | 

Debug mode 10-3 

Decimal exponent 2-17 

Decimal notation 2-17 

DECMIC pseudo 

description 7-4 
example 5-6; 7-4 
permissible anywhere 4-2 
DEF attribute 4-65 
Default symbols 
definition 2-7 
listing 11-9 
unqualified 4-25 
zero block 3-2 
Deferred symbols 

(see default symbols) 

Definition 

equivalenced macro 5-24 
macro 5-13,15,24 
micro 7-2 
opdef 5-13,27 
processing 5-13 
purging 6-9 
reference 5-18,25,30 
symbol 2-6; 4-42 
system 5-35 
Definition operation 

duplicated code 5-6 
equivalenced macro 5-13 
external text 5-2 
macro 5-13 
operation code 5-13 
processing 5-14 
recursion level 5-1 
remote text 5-3 
Delimiter 

actual parameter 5-18,26 
data item 2 -15,16 
expression element 2-21 
field 2-1,2 

substitutable parameter 5-8,13,16 
term 2-22 

Descriptor, variable field 5-27 
Destination field 2-26 
Detailed listing 4-72; 11-1 
DF instruction 8-23 
Direct address 9-12 
Directives, loader 4-21 
Directory, error 11-9 
DIS pseudo 

description 4-47 
example 4-47,49 
force upper 3-4 
Display code option 
character set A-l 
default mode 2-13 
option 4-24 
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Divide instructions 8-42 
| DM instruction 8-52 
Dollar sign 

local symbol separator 5-31 
parameter separator 5-8,13,16, 24, 28 
special element 2-5 

Double precision instructions 8-36, 37,40 
DU P pseudo 

description 5-6 
example 5-10,11 
listing of count 11-6 
Duplication 
code 5-6 
echoed 5-7 
indefinite 5-7,9 
DXi instructions 
add 8-37 
multiply 8-40 

E code option 4-25 
| E entry point flag 11-14 
E error 11-10 
E list option 4-72 
E numeric data modifier 2-17 
ECHO pseudo 

description 5-7 
example 5-12 
ECS blocks 4-32 
Editing 2-4 

EE numeric data modifier 2-17 
EIM instruction 9-18 
EJECT pseudo 4-74 

permissible anywhere 4-2 
Eject suppression 10-4 
EJM instruction 9-17 
Element 

absolute 2-23 
data 2-10 

expression 2-21, 26 
external 2-24 
operator 2-22 
register 2-25 
relocatable 2-9, 24 
special 2-9,21 
ELSE pseudo 

description 4-58 
example 5-5 

permissible anywhere 4-2 
END pseudo 

assembly of remote code 5-3 
binary generation 3-6 
description 4-4 

1 effect on blocks 3-1, 6, 8, 10, 12 
example 4-4; 5-7, 13, 14, 16 
external text use 5-3 
force upper 3-4 
illegal definitions 5-1 
permissible anywhere 4-2 
ENDD pseudo 

acting as nil 6-6 
description 5-10 
example 5-11 
permissible anywhere 4-2 
used with DUP 5-7 
used with ECHO 5-8 


ENDIF pseudo 

acting as nil 6-6 
description 4-57 
permissible anywhere 4-2 
ENDM pseudo 

acting as nil 6-6 
description 5-14 
example 4-29; 5-11,15,19, 20,21 
permissible anywhere 4-2 
End-of-line mark 5-1 
ENDX pseudo 4-77 
Entry address 
absolute 4-3 
declaration 4-43 

multiple 3-12 § 

relocatable 4-4 
ENTRY pseudo 

description 4-43 
example 4-5,44 
ENTRY C pseudo 4-43 
Entry point list 11-4 
Environment test 4-58 
EOM instruction 9-18 
EQ instruction 

description 8-24 
example 8-25 
force upper 3-4 
EQ IF operator 4-60 
IFC operator 4-66 
EQU pseudo 

description 4-39 

example 2-19, 21; 4-19, 37, 39,62; 5-6 
listing 11-6 
Equal sign 

default symbol prefix 2-7 
instruction 4-39 
literals prefix 2-11,13,17 
local symbol separator 5-31 
parameter separator 5-8,13,16, 25,28 
ERN instruction 9-12 
ERR pseudo 

description 4-69 
Error, assembly 
fatal 11-9 
informative 11-12 
programmer controller 4-69,70 
Error directory 

detailed description 11-9 
general description 4-71 
Error exit instruction 8-11 
Error flags 

conditionally set 4-69 
fatal 11-9 
informative 11-12 
unconditionally set 4-70 
where on listing 11-6 
ERRxx pseudo 4-70 
ES instruction 8-11 
ESN instruction 9-22 
ETN instruction 9-12 
Evaluation of expression 2-26 
Exchange exit instruction 8-15 
Exchange jump instruction 8-14 
Execution, CPU program 1-3 
EXN instruction 9-10 
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Exponent 2-17 
Expression 

absolute 2-23 
attribute 4-64 
comparison 4-60 
CON use 4-52 
' description 2-21 
| evaluation 2-21,26; 3-3 

examples 2-24, 25 
external 2-24 
maximum size 2-26 
operators 2-22 

I pass one value 2-26; 3-3 

pass two value 2-26; 3-3 
register 2-25; 8-2, 9 
rules 2-22 
size 2-26 
types 2-23 

| value 2-23,26; 3-3; 8-5 

VFD 4-51 
EXT attribute 4-64 
External BCD 

character set A-l 
option 4-25 
External symbol 

declaration 4-45 
description 2-5 
strong 2-7 
weak 2-7 

External symbol list 11-4 
External text 

assembly 5-2 
file declaration 10-3 
listing 4-77 
EXT pseudo 

description 4-45 

illegal in absolute code 4-6, 9,10 

| F conditional flag 11-14 
F error 11-10 
F FORTRAN mode 10-3 
F list option 4-72 
FAN instruction 9-21 
_ Fatal error flag 11-9 
I Features of COMPASS 1-2 
Field 

comments 2-2; 4-29 
conventional 2-3 
delimiter 2-1,2 
destination 2-25; 4-51 
_ free 2-1 

1 length, threshold 1-3 

location 2-1 
operation 2-1 
size 2-1 
subfield 2-2 
terminator 2-1 
variable 2-2 

File 

COMPILE 10-3 
INPUT 10-3 
LGO 10-2 
list output 10-3 
load and go 10-2 
OLDPC 10-5 
OPL 10-5 
OUTPUT 10-3 


source 10-3 

SYSTEXT 4-17; 10-3,4,5 
System text overlay 10-5 

Fill 

blank 2-14 
zero 2-14 

FIM instruction 9-18 

First column 2-1 

First statement group 4-2 

Fixed point data notation 2-17 

Fixed point instructions 8-38,40 

FJM instruction 9-17 

Flag, error 

listing 11-6 
setting 4-69 

type 11-14 1 

Floating point data notation 2-16 
Floating point units 8-3, 6 
add 8-36,37 
divide 8-42 
multiply 8-39,40 
FNC instruction 9-21 
FOM instruction 9-18 
Forcing upper 3-4 
BSS 4-35 

CPU instructions 8-2 
LOC 4-36 
macro call 5-18,25 
opdef call 5-27 
ORG 4-33 
ORGC 4-33 
R= 4-53 
USE 4-30 
USELCM 4-32 
VFD 4-51 

Form, COMPASS coding 2-3 
Format 

control statement 10-1 
CPU instruction 8-12 
line 2-1 
listing 11-1 
PPU instruction 9-1 
FORTRAN 4-4; 10-3 
Full list 10-3 
Functional units 8-3, 6 
Functions, PPU 
arithmetic 9-4 
data transmission 9-3 
logical 9-4 
replace 9-5 
FXi instruction 
add 8-37 
divide 8-42 
multiply 8-39 

G assembly mode 10-3 
G list option 4-72 
GE instructions 8-23 
GE IF operator 4-60 
IFC operator 4-66 
Generated code listing 4-72 
Generation, data 4-46 
Get text mode 10-3 
GT instruction 8-23 
GT IF operator 4-67 
IFC operator 4-72 
Guaranteed zero 2-14 4-48 
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Hardware configuration 1-3 
Hardware feature dependency 4-7 
Heading 

listing 4-71; 11-1 
macro 5-13 
opdef 5-13 
HERE pseudo 

description 5-4 
permissible anywhere 4-2 
Hexadecimal data 2-21 

I code option 4-21 
I hardware feature code 4-7 
I input mode 10-3 
I NOLABEL option 4-21 
IAM instruction 9-20 
IAN instruction 9-19 
IBj instruction 8-20 
ID instruction 8-22 
IDENT pseudo 

I binary generation 3-8, 9, 10 

blank variable field 3-14; 4-11 
description 4-2, 11 
example 4-4, 7, 13, 14, 16, 17, 19 
force upper 3-4 

I overlay generation 3-8, 9, 10 

program identification 4-2 
IF pseudo 4-63 
IF skipped lines listed 4-72 
IFCP pseudos 4-59 
IFC pseudo 

description 4-66 
example 5-5,11 
permissible anywhere 4-2 
IFop pseudo 4-60 
IFPP pseudo 4-59 
IFtype pseudo 4-59 

I IJM instruction 9-17 
IM instruction 8-51 
Increment unit 8-3, 6, 44, 46, 48 
Indexed address, PPU 9-14 
Index register 8-7 
Indirect address, PPU 9-13 
Input, assembler 10-3 
Instructions 

coding of 2-1 
CMU 8-49 
CPU 8-1 

mnemonically identified 6-3 
_ nil 6-6 

| no-operation 8-43; 9-9 

PPU 9-1 
pseudo 4-1 
redefinition 5-16, 25 
synonymous 6-5, 10 
syntactically identified 6-7 
Integer add 8-37 
Integer subtract 8-37 
Integer multiply 8-40 
Integer value 2-17 
| Interactive debugging 1-4 
Internal BCD 

character set D-l 
option 4-24 

Invented symbol 5-32; 11-8 
IR instruction 8-22 


IRM instruction 9-18 
IRP pseudo 

acting as nil 6-6 
description 5-33 
example 5-34, 35 
permissible anywhere 4-2 

IXi instructions 8-38,40 | 

J option 4-9,10; 9-5 
JDATE micro 7-6 
Job statement 10-1 
JP instruction 

description 8-21 

force upper 3-5 | 

L control statement option 
description 10-3 
related to LIST 4-72 

L error 11-11 | 

L hardware feature code 4-8 
L list option 4-72 

L location flag 4-36; 11-14 1 

Labeled common 
description 3-2 
establishment 4-30. 32 
LCC pseudo 

description 4-21 
illegal if absolute 4-6, 9,10 
LCM attribute 4-64 
LCM blocks 3-2; 4-32 
LCM transfer instructions 8-13,16 
LCN instruction 

data transmission 9-3 
description 9-8 
LDC instruction 

data transmission 9-3 
description 9-9 
example 2-20 
LDD instruction 

data transmission 9-3 
description 9-12 
LDI instruction 

data transmission 9-3 
description 9-13 
LDM instruction 

data transmission 9-3 
description 9-15 
example 5-21 
LDN instruction 

data transmission 9-3 
description 9-8 
example 5-12; 9-8 
LDSET pseudo 

description 4-21 
permissible anywhere 4-2 

Left shift instruction 8-29,31 | 

LE IF operator 4-60 
IFC operator 4-66 
LE instruction 8-24 
Library maintenance programs 2-1 
LGO control statement 10-6 
Linkage symbols 2-6; 4-43 
Listable output 

assembled code 11-5 
assembler statistics 11-8 
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binary control cards 11-1 
block usage 11-2 
control statement 10-3 
default symbols 11-8 
entry point symbols 11-4 
error directory 11-9 
| error flags 11-9 thru 12 

external symbnols 11-4 
header information 11-1 
literals 11-7 
source statements 11-5 
1 statistics 11-8 

subtitles 11-1 

symbolic reference table 11-13 
titles 11-1 

user control 4-77; 10-3,4 
List, full 10-3 
Listing control 

control statement 10-3,4 
pseudo 4-71 
List, parameter 
ECHO 5-8 

equivalenced macro 5-25 
macro 5-18 
LIST pseudo 

description 4-71 
example 4-13; 5-6,12 
permissible anywhere 4-2 
List, short 10-4 
Literals 

I absolute program 3-6, 7, 10, 11 

description of block 3-1, 2 
| IDENT 3-10, 14 

listing 11-7 
location 1-3; 3-1,2 
| notation 2-11 

protection 4-33 

I SEGMENT overlay 3-10 

SEG partial binary 3-12 

symbol (default) 2-7 
LIT pseudo 

description 4-49 

example 2-12,17, 21; 4-15, 56; 5-6 
listing 11-6,7 
LJM instruction 

description 9-6 
example 5-21 
LMC instruction 

description 9-9 
logical function 9-5 
LMD instruction 

description 9-12 
logical function 9-5 
LMI instruction 

description 9-13 
logical function 9-5 
LMM instruction 

description 9-15 
logical function 9-5 
LMN instruction 

description 9-8 
logical function 9-5 
LO control statement option 10-4 
Load address 4-3 
| Load-and-go file 1-3; 10-2 


Loader control statement 4-21 
LOC attribute 4-64 
Local blocks 3-2 

absolute program 3-6 
description 3-2 
establishment 4-30, 32 
relocatable program 3-5 
LOCAL statement 

description 5-31 
example 5-32 
heading 5-13 
Local symbol 

CPU instruction 8-4 
macro body 5-13 
subprogram 3-1; 4-27 
Location counter 
BSS 4-35 
control 4-36 
description 3-4 
forced upper 3-4 
ORG 4-33 
ORGC 4-33 

special element 2-9; 3-4 
USE 4-30 
USELCM 4-32 
Location field 

listing 11-6 
statement 2-1 
LO control card option 
description 10-4 
related to LIST 4-71 
LOC pseudo 

description 4-36 
example 4-37,53 
location counter changed 3-4 
Logical difference instruction 8-27 
Logical functions, PPU 9-4 
Logical minus 2-22 
Logical product instruction 8-26 
Logical product and complement instruction 8-28 
Logical shift instruction 8-29,31,32 
Logical sum instruction 8-26 
Long add unit 

description 8-4, 6 
instructions 8-38 
LPC instruction 

description 9-9 
logical function 9-5 
LPN instruction 

description 9-8 
logical function 9-5 
LT IF operator 4-60 

IFC operator 4-64 
LT instruction 8-24 
LXi instruction 8-29, 31 
example 2-19 

M base option 4-22.2 
M list option 4-72 
Machine test 4-5 8 
MACHINE pseudo 4-7 
Macro 

body 5-13 
call 5-18,25 
equivalenced 5-24 
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definition 5-13 
header 5-14 
list control 4-72 
name 2-2; 5-15,18,25; 6-1 
permissible anywhere 4-2 
processing 5-1,14 
system defined 4-73; 5-35 
terminator 5-14 
MACROE pseudo 

description 5-24 
example 5-26 
IRP related 5-33 
operation code table entry 6-1 
permissible anywhere 4-2 
MACRO pseudo 

description 5-15 

example 4-29,74; 5-5,19,20,21,22, 32, 33, 34 
IRP related 5-33 
operation code table entry 6-1 
permissible anywhere 4-2 
MAN instruction 9-10 
Mask instruction 8-3 
Mass storage, system 1-3 
Master list control 4-71 
MAX pseudo 

description 4-40 
listing 11-6 
MD instruction 8-51 
MESSAGE macro 12-25 
MI instruction 8-22, 24 
MIC attribute 4-65 
MICCNT pseudo 

description 4-42 
example 4-42 
listing 11-6 

permissible anywhere 4-2 
MICRO 

decimal 7-4 

definition 4-22, 25,26; 7-2 
editing 2-4 
mark 2-4; 5-1 
octal 7-4 
reference 7-1 
size 4-42; 7-2 
system defined 4-17; 7-2,5 
test for 4-65 
MICRO pseudo 

description 7-2 
example 4-42; 5-11; 7-2,3 
permissible anywhere 4-2 
MI instructions 8-22,24 
MIN pseudo 

description 4-41 
listing 11-6 

Minus as local symbol separator 5-31 

Minus as parameter separator 5-8,13,16,24,28 

Minus on listing 11-6 

Minus operator 2-21,22; 8-4 

Minus sign in location field 

CPU instruction 3-4,5; 4-51 
PPU instruction 3-4; 4-51 
VFD instruction 4-51 
MJ instruction 8-16 
force upper 3-4 


MJN instruction 
description 9-6 
effect of J 4-9,11 
ML control statement option 10-4 
Mnemonic operation code 

legal operation field entry 2-1 
OPDEF defined 5-27 
search for 6-1 
Modifiers, numeric data 2-17 
MODIFY common decks 5-2 
MODLEVEL micro 7-7 
MOVE macro 12-28 
Multiple entry point table 
suppression 4-20 
used for overlays 3-12 
MXi instruction 

description 8-41 
example 2-19; 8-41 
MXN instruction 

description 9-10 

N eject mode 10-4 
N error 11-11 
N list optical 4-73 
Name 

block 4-30,32 
different types 2-4 
duplicate code 5-7, 8 
general description 2-4 
IF sequence 4-57 
macro 5-16 

micro 4-22, 24, 26; 7-2,4,5 
mnemonic operation 6-1 
overlay 4-11,15 
parameter 5-8 
remote code 5-3 
NE instruction 8-24 
NE IF operator 4-60 
IFC operator 4-66 
Nesting, level of 1-3 
NG instruction 8-22, 24 
NIL pseudo 6-6 

permissible anywhere 4-2 
NIM instruction 9-18 
NJN instruction 

description 9-6 
effect of J 4-9,10 
NO eject option 10-4 
NO instruction 8-43 
NOLABEL pseudo 
description 4-20 
permissible anywhere 4-2 
NOM instruction 9-18 
NOREF pseudo 4-76 

permissible anywhere 4-2 
Normalize instruction 8-33 
Normalize unit 

description 8-6 
instructions 8-33 
Not equal sign 

parameter separator 5-8,13 
special character 2-4 
Numeric data 2-16 
NXi instruction 8-33 
NZ instruction 8-22, 24 
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O base 2-18; 4-22.2 
O error 11-11 
O mode 10-4 
OAM instruction 9-20 
OAN instruction 9-19 
OBj instruction 8-20 
Octal listing 11-5 
Octal notation 2-16 
OCTMIC pseudo 7-4 

permissible anywhere 4-2 
OLDPL file 10-3 
Opdef 

body 5-13 
call 5-29 
definition 5-13 
heading 5-13 
list control 4-72,73 
processing 5-14 
system defined 4-17, 33 
OPDEF pseudo 

description 5-27 
example 5-29,30, 31, 32 
operation code table entry 6-1 
permissible anywhere 4-2 
Operand register 8-8 
Operation code table 6-1 
Operation code value 
CPU 6-7; 8-1 
PPU 6-3; 9-1 
Operation, definition 
compressed 5-1 
duplicated text 5-6 
external text 5-2 
general description 5-1 
macro definition 5-13 
opdef definition 5-13 
remote text 5-3 
system 5-35 
Operation field 
blank 4-46 
description 2-1 
search 6-1 
Operator 

element 2-22 
mnemonic 5-27; 6-3 
register 2-21; 5-28; 6-7 
term 2-22 

Operator with constant 2-13, 16 
OPL file 5-2; 10-3; 12-1 
OPSYN pseudo 

description 6-5 
permissible anywhere 4-2 
ORG pseudo 

description 4-33 
determine blocks 3-1 
establish absolute blocks 3-2; 4-33 
example 4-4,7,13,14,16 
location counter changed 4-33 
origin counter changed 3-3; 4-33 
ORGC pseudo 4-33 
Origin 

multiply entry point 4-3 
overlay 4-12,15 
program 4-3 
Origin counter 
BSS 4-35 


control 3-3; 4-33, 35 
description 3-3 
final value, absolute 3-6 
final value, relocatable 3-5 
forced upper 3-4 

ORG 4-33 
ORGC 4-33 

special element 2-9; 3-3 
USE 4-30 

OR instruction 8-22 
ORM instruction 9-18 
Overflow error 2-17 
Overlay 

absolute 3-8 
control tables 4-21 
entry point 4-12, 15 
general description 3-6, 8 
level numbers 4-4,12, 15 
multiple entry point 3-12 
name 4-12, 15 
origin 4-12, 15 
PPU 3-7, 9 

primary 3-8, 9,11, 13; 4-12, 15 
secondary 3-6, 8, 9; 4-12, 15 

P error 11-11 

P numeric data modifier 2-17 

P pagination mode 10-4 

Pack instruction 8-35 

Padding of CPU word 3-4; 4-51; 8-2 

Page heading 11-1 

Page number 11-1 

Pagination control 10-4 

Parameter 

actual 5-7,18,25 
embedded 5-18,25 
formal 5-8,13 
indefinitely repeated 5-34 
iterative 5-18,25, 34 
substitutable 5-8,13,16,25,28,34 
Parameter mark 5-9,13 
Parameter, null 5-9,18,25 
Parameter separator 
actual 5-18, 25 
formal 5-8,13,16 
Parcel 8-1 
Parentheses 

local symbol separator 5-31 
nested 5-9 

parameter separator 5-8,13,16,25,28 
Partial binary 

IDENT type 3-14 
SEG type 3-12 
Pass instruction 
CPU 8-43 
PPU 9-9 
Pass one 

expression evaluation 2-23, 26, 28 ; 3-3 
general description 1-3 
maximum test 4-40 
minimum test 4-41 
symbol definition 2-6 
Pass two 

expression evaluation 2-22,26; 3-3; 8-2 
general description 1-3 
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symbol definition 2-5 
value for MAX 4-40 
value for MIN 4-41 
PC control statement option 10-4 
PCOMMENT micro 7-7 
PD control statement option 10-4 
PERIPH pseudo 

description 4-10 
effect on branch instructions 9-5 
example 4-47; 6-5 
first statement group 4-2 
PJN instruction 

description 9-6 
effect of J' 4-9,10 
PL instruction 8-22,24 
Plus in location field 

I CPU instruction 3-4 
PPU instruction 3-5 
VFD instruction 4-51 

Plus as parameter separator 5-8,13,16, 25, 28 
Plus as local name separator 5-31 
| Plus on listing 11-6; D-2, 3 
Plus operator 2-21, 23; 8-4 
Point 

binary 2-18,19 
decimal 2-18,19 
octal 2-18,19 

parameter separator 5-8,13,16,25, 28 
register designator 2-8 
| Population unit 8-44 
Position counter 

control 4-38,51 
description 3-4 

J special element 2-9; 3-4 

POS pseudo 4-38 
Post radix 2-17 
PPOP 

description 6-3 
example 5-12; 6-5 
permissible anywhere 4-2 
PPU instructions 9-1 
A-register I/O 9-19 
block I/O 9-19 
branch I/O 9-17,18 
branch 9-5 

central read/write 9-15 
channel function 9-21 
constant mode 9-8 
designators 9-3 
direct address 9-12 
error stop 9-22 
exchange jump 9-10 
format 9-1 
functions 9-3 

indexed direct address 9-14 
indirect address 9-13 
no address 9-7 
no operation 9-9 
output record flag 9-20 
shift 9-7 
PPU pseudo 

description 4-8 
effect on branch 9-5 
example 4-10,52 
first statement group 4-2 


Prefix table 

comments 4-20 
generation 3-6, 7, 8 
suppression 4-21 
Preradix 2-17 
Program, absolute 3-6; 4-6 
Program execution 10-5 
Program identification 4-2 
Program origin 4-3 
Program, relocatable 3-5 
Program stop instruction 8-10 
Program structure 3-1 
PS control statement option 10-4 
Pseudo instructions 
binary control 4-6 
block counter control 4-30 
conditional assembly 4-57 
data generation 4-45 
definition operation 5-1 
error control 4-69 
first statement group 4-2 
introduction 4-1 
listing control 4-71 
micro 7-1 
mode control 4-21 

operation code table management 6-1 
operation field entry 2-2 
permissible anywhere 4-2 
required 4-2 

subprogram identification 4-2 
subprogram linkage 4-43 
symbol definition 4-38 
types 4-1 
PS instruction 

description 8-10 
force upper 3-4 
PSN instruction 9-9 
PURGDEF pseudo 
description 6-10 
permissible anywhere 4-2 
PURGMAC pseudo 
description 6-7 
example 6-6 

permissible anywhere 4-2 
Push down stack 1-3 
PXi instruction 8-35 

Q to represent expression 5-27; 6-8 
Qualifier, symbol 4-25 

used for definition operations 5-2 
QUAL micro 7-6 
QUAL pseudo 

description 4-25 
example 4-13,28; 5-22 
permissible anywhere 4-2 

R error 11-11 

R hardware feature code 4-8 
R list option 4-73 
R= pseudo 

description 4-53 

example 4-54; 5-21 

illegal in PPU program 4-9,10 
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RAD instruction 

description 9-12 
replace function 9-5 
Radix 2-17 
RAI instruction 

description 9-13 
replace function 9-5 
RAM instruction 

description 9-15 
replace function 9-5 
Real-time clock set instruction 8-18 
Record name, external text 5-3 
Recursion level 1-4; 5-1 
Recursion stack 1-4; 5-1 
Reference 

macro 5-18 
macroe 5-24 
nested 5-1 
opdef 5-27 
I Reference table, symbolic 11-13 
Registers, CPU 2-8; 8-7 
Register designators 
CPOP 6-7 
description 2-8; 8-7 
not symbols 2-5 
OPDEF 5-27 
OPSYN 6-5 
PURGDEF 6-10 
RE instruction 

description 8-13 
force upper 3-4 
READC macro 12-28 
READH macro 12-28 
READO macro 12-29 
READS macro 12-29 
READW macro 12-29 
RECALL macro 12-30 
RE L attribute 4-64 
Relocatable program structure 3-5 
Relocatable test 4-64 
Remote assembly 5-3 
Repeat count 
DUP 5-7 
replication 4-55 
REP pseudo 4-55 
RE PC pseudo 4-55 
RE PI pseudo 

example 4-55 
description 4-55 
illegal if absolute 4-6,9,10 
RE PL table 

result of BSSZ 4-46 
result of REP,REPC, or REPI 4-55 
written by SEGMENT 4-15 
Replace functions, PPU 9-5 
Replication of code 4-55 
Return jump, CPU 8-11 
RFN instruction 9-20 
RI instruction 8-18 
Right shift 8-30, 32 
RJ instruction 

description 8-12 
example 4-31; 5-21; 8-12 
| force upper 3-5 


RJM instruction 9-6 
RL instruction 8-14 
RMT pseudo 

description 5-3 
example 5-5, 6 
permissible anywhere 4-2 
RO instruction 8-19 
Round and normalize instruction 8-34 

RPN instructions 9-11 
RXi instructions 
add 8-38 
divide 8-42 
multiply 8-39 
RXj instruction 8-17 

S list optical 4-73 
S numeric data modifier 2-18 
S storage flag 11-14 
S system text mode 10-5 
SAi instructions 

description 8-44 

example 2-15,16,19; 4-31, 36; 5-22, 33; 8-45 
SBD instruction 

arithmetic function 9-4 
description 9-12 
SBI instruction 

arithmetic function 9-4 
description 9-13 
SBi instructions 

description 8-46 
example 2-9,12; 8-47 
SBM instruction 

arithmetic function 9-4 
description 9-15 
SBN instruction 

arithmetic function 9-4 
description 9-8 
Scale, binary 2-18 
SCM blank common 3-3 
SCM labeled common 3-2 
SCN instruction 

description 9-8 
logical function 9-5 
SEG pseudo 

binary generation 3-12 
description 4-15 
example 4-16 
force upper 3-4 
illegal in PPU pregram 4-9,10 
SEGMENT pseudo 

binary generation 3-8,9,10,12 
description 4-16 
example 4-17 
force upper 3-4 
illegal in PPU program 4-9,10 
overlay structure 3-10, 12 
Semicolon in definition 5-8,13 
SEQUENCE micro 7-7 
Sequencing 

listing 11-7 
statement 2-1 
SET attribute 4-64 
Set instructions 8-44 thru 8-49 



SET pseudo 

description 4-39 
example 2-9, 20; 5-11,22 
listing 11-6 

Shift 

description of unit 8-3,6 
| CPU instructions 8-29 thru 8-32,41 

PFU instructions 9-7 
SHN instruction 9-7 
Short jump limit 4-9,11 
Short list 10-4 
Single precision instructions 
| add rounded 8-37 

add unrounded 8-36 
divide rounded 8-42 
divide unrounded 8-42 
multiply rounded 8-39 
multiply unrounded 8-39 
SKIP pseudo 

description 4-68 
permissible anywhere 4-2 
Slant bar 

local symbol separator 5-31 
operator 2-22 

parameter separator 5-8,13,16, 24,28 
SOD instruction 

description 9-12 
replace function 9-5 
SOI instruction 

description 9-13 
replace function 9-5 
SOM instruction 

description 9-15 
replace function 9-5 
Space, embedded (see blank) 

SPACE pseudo 

description 4-74 
permissible anywhere 4-2 
Special elements 

FORTRAN call 2-9 
general description 2-9 
in variable field 2-2 
location counter 3-4 
| origin counter 3-3 
position counter 3-4 
SST attribute 4-65 
SST pseudo 4-43 
example 4-13 
permissible anywhere 4-2 
Stack, recursion 1-4; 5-1 
Statement 

coding conventions 2-3 
comments 2-2 
compressed 5-1 
continuation 2-2 
external source 5-2 
first column 2-1 
first group 4-1 
format 2-1 
listing 11-5 

number assembled 11-8 
size 2-1 

source of 5-1; 10-3 
Statistics, assembler 11-8 
STD instruction 

data transmission function 9-3 
description 9-12 


STEXT pseudo 

description 4-17 
example 4-19 
first statement group 4-2 
STI instruction 

data transmission function 9-3 
description 9-13 
STM instruction 

data transmission function 9-3 
description 9-15 
STOPDUP pseudo 
description 5-9 
example 5-11 

Storage reservation 4-35,46 
String, character 

comparison 4-66 
data generation 4-47 

delimited 2-11,14 | 

empty 2-14 
micro 2-4 
notation 2-13 
Strong external 2-7 
Subprogram length 3-5 
Substitution, micro 7-1 
Subsubtitle 

CTEXT 4-77 
EJECT 4-74 
listing of 11-1 
QUAL 4-25 
SPACE 4-74 
TITLE 4-75 
TTL 4-76 
Subtitle 

CTEXT 4-77 
listing of 11-1 
TITLE 4-75 
SXi instruction 

description 8-48 | 

example 2-15,19; 5-21,31; 8-48 
Symbol 

attribute 2-6; 4-37,64 
created 5-32 
default 2-7 
definition 2-5; 4-38 
duplicate 2-6 
entry point 2-6 
external 2-7 

invented 5-32; 11-8 | 

literals 2-6 

local to macro 5-13,31 

local to QUAL 3-1 

location field 2-6 

lost 11-8,13 

number defined 11-8 

number referenced 11-8 

previously defined 2-7 

qualified 2-7; 4-25 

redefinition 4-27, 39 | 

system-defined 2-6; 4-43 
undefined 2-7 
value 2-6; 4-37 
Symbol qualifier listed 11-1 
Symbol table 

clearing 3-10, 12 | 

system text 4-17 
Symbolic reference table 
address reference 4-7 8 
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| detailed description 11-12 
general description 4-71 
generation 1-3 
list control 4-71; 10-3 
omit symbol 4-76 
Synonymous operation 
CPU 6-10 
mnemonic 6-5 
PPU 6-5 
syntactic 6-7 

Syntax definition 5-27; 6-7,10 
Syntax search 6-1 
SYSTEM macro 12-30 
System text 4-19 
SYSTEXT option 10-4 

related to G mode 10-4 
related to STEXT 4-17 

T list option 4-73 
Table 

operation code 6-1 
| symbolic reference 11-12 
USE 4-30 

TBj instruction 8-18 
Term 2-22 
Term operator 2-22 
Terminator, macro 5-13 
Test symbol attribute 4-64 
Time limit 10-1 
TIME micro 7-6 
Time of assembly 11-1 
Title 

ES 8-11 
IDENT 4-3 
listing of 11-1 
PS 8-10 
TITLE 4-75 
TITLE pseudo 4-75 

permissible anywhere 4-2 
Transfer symbol 4-4 
Transmit instruction 8-25 
Truncation, character data 2-13 
expression value 2-26 
TTL pseudo 4-76 

permissible anywhere 4-2 

| U error 11-11 
UJN instruction 

effect of J 4-9,10 
description 9-6 
Unconditional jump 
CPU 8-20 
PPU 9-6 

Underflow error 2-18 
Unpack instruction 8-35 
USE pseudo 

I change blocks 3-1, 2, 3, 5; 4-30 
description 4-30 

establish common blocks 3-2, 3; 4-30 
establish local blocks 3-2; 4-30 
example 4-17,28,29,31,34,36 
USE table 

entry 4-30, 32, 33 
1 reinitialization 3-10, 12; 4-11 
USELCM pseudo 

description 4-32 


establish common blocks 3-2, 3 
example 4-33 

illegal in PPU program 4-9,10 
USES control statement 10-7 
UXi instruction 8-34 

V error 11-11 
Value, numeric 2-17 
Variable field 2-2 
Variable field definition 4-51 
VFD pseudo 

description 4-51 

example 2-15; 4-23,28,31,52; 5-22 

WE instruction 

description 8-13 
force upper 3-4 
Weak external 2-7 
WL instruction 8-14 
WRITEC macro 12-31 
WRITEH macro 12-31 
WRITEO macro 12-31 
WRITES macro 12-32 
WRITEW macro 12-32 
WXj instruction 8-17 

X external flag 4-45; 11-6 
X external text mode 10-5 
X file option 

description 10-5 
XTEXT default 5-3 
X hardware feature code 4-8 
X list option 4-73 
X register 

conditional instructions 8-21 
description 8-3 
designator 2-8 
setting 8-48 
XJ instruction 

description 8-15 
force upper 3-4 
XREF pseudo 

description 4-78 , 

permissible anywhere 4-2 
XTEXT pseudo 5-1 

related to CTEXT/ENDX 4-77 
XTEXT source 10-5 

Zero block 

absolute program 3-2, 6, 7 
description 3-2 
relocatable program 3-5 
Zeroed words 4-46 
Zero fill 2-14, 4-51 
Zero guaranteed 
data item 2-14 
DIS item 4-48 
ZJN instruction 

description 9-6 
effect of J 4-9,10 
ZR instruction 

description 8-22,24 
force upper 3-4 
ZXi instruction 8-34 
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Usage 


Name 

Placement 

Usage 

Number 

ABS 

first group 

CPA 

4-6 

IFPP6 

normal 

CPTP 

4-58 

BASE 

anywhere 

CPJ>P 

4-22.1 

IFPP7 

normal 

CPTP 

4-58 

BSS 

normal 

CP,PP 

4-35 

IRP 

anywhere 

CPTP 

5-33 

BSSZ 

normal 

CP TP 

4-46 

LCC 

normal 

CPR 

4-21 

Bl=l 

anywhere 

CP 

4-28 

LDSET 

anywhere 

CPR 

4-21 

B7=l 

anywhere 

CP 

4-28 

LIST 

anywhere 

CPTP 

4-71 

CHAR 

anywhere 

CPTP 

4-24 

LIT 

normal 

CPTP 

4-49 

CODE 

anywhere 

CPJPP 

4-24 

LOC 

normal 

CPTP 

4-36 

COL 

normal 

CP TP 

4-29 

LOCAL 

macro or opdef 

CPTP 

5-31 

COMMENT 

anywhere 

CP.PP 

4-20 

MACHINE 

first group 

CPTP 

. 4*1 

CON 

normal 

CP TP 

4-52 

MACRO 

anywhere 

CPTP 

5-15 

CPOP 

anywhere 

CP 

6-7 

MACROE 

anywhere 

CPTP 

5-24 

CPSYN 

anywhere 

CP 

6-10 

MAX 

normal 

CPTP 

4-40 

CTEXT 

normal 

CP 

4-77 

MICCNT 

anywhere 

CPTP 

4-42 

DATA 

normal 

CP.PP 

4-46 

MICRO 

anywhere 

CPTP 

7-2 

DECMIC 

anywhere 

CP,PP 

7-4 

MIN 

normal 

CPTP 

4-41 

DIS 

normal 

CP TP 

4-47 

NIL 

anywhere 

CPTP 

6-6 

DUP 

normal 

CP,PP 

5-6 

NOLABEL 

anywhere 

CPA TP 

4-20 

ECHO 

normal 

CP TP 

5-7 

NOREF 

anywhere 

CPTP 

4-76 

EJECT 

anywhere 

CP ,PP 

4-74 

OCTMIC 

anywhere 

CPTP 

7-4 

ELSE 1 ' 

anywhere 

CP TP 

4-58 

OPDEF 

anywhere 

CP 

5-27 

END 1 

required last 

CP.PP 

4-4 

OPSYN 

anywhere 

CPTP 

6-5 

ENDD 

anywhere 

CP ,PP 

5-10 

ORG 

normal 

CPTP 

4-33 

ENDIF 1 

anywhere 

CP TP 

4-57 

ORGC 

normal 

CPTP 

4-33 

ENDM 

anywhere 

CP,PP 

5-14 

PERIPH 

first group 

PP 

4-10 

ENDX 

normal 

CP ,PP 

4-77 

POS 

normal 

CPTP 

4-38 

ENTRY 

normal 

CP TP 

4-43 

PPOP 

anywhere 

PP 

6-3 

ENTRYC 

normal 

CP,PP 

4-43 

PPU 

first group 

PP 

4-8 

EQU 

normal 

CP,PP 

4-39 

PURGDEF 

anywhere 

CP 

6-10 

ERR 

normal 

CP ,pp 

4-69 

PURGMAC 

anywhere 

PP.CP 

6-7 

ERRMI 

normal 

CP,PP 

4-70 

QUAL 

anywhere 

CPTP 

4-25 

ERRNG 

normal 

CP,PP 

4-70 

REP 

normal 

CPR 

4-55 

ERRNZ 

normal 

CP.PP 

4-70 

REPC 

normal 

CPR 

4-55 

ERRPL 

normal 

CPTP 

4-70 

REPI 

normal 

CPR 

4-55 

ERRZR 

normal 

CP.PP 

4-70 

RMT 

anywhere 

CPTP 

5-3 

EXT 

normal 

CPTP 

4-45 

R= 

normal 

CP 

4-53 

HERE 

anywhere 

CPTP 

5-4 

SEG 

normal 

CPA TP 

4-16 

IDENT 

required first 

CPTP 

4-2 and 

SEGMENT 

normal 

CPA TP 

4-15 




4-11 

SET 

normal 

CP.PP 

4-39 

IF 

normal 

CPTP 

4-63 

SKIP 

anywhere 

CPTP 

4-68 

IFC 

anywhere 

CPTP 

4-66 

SPACE 

anywhere 

CPTP 

4-74 

IF CP 

normal 

CPTP 

4-58 

SST 

anywhere 

CPTP 

4-43 

IFCP6 

normal 

CPTP 

4-58 

STEXT 

first group 

CPTP 

4-17 

IFCP7 

normal 

CPTP 

4-58 

STOPDUP 

normal 

CPTP 

5-9 

IFEQ 

normal 

CP ,PP 

4-60 

TITLE 

anywhere 

CPTP 

4-75 

IFGE 

normal 

CPTP 

4-60 

TTL 

anywhere 

CPTP 

4-76 

IFGT 

normal 

CP.PP 

4-60 

USE 

normal 

CPTP 

4-30 

IFLE 

normal 

CP.PP 

4-60 

USELCM 

normal 

CP 

4-32 

IFLT 

normal 

CP ,PP 

4-60 

VFD 

normal 

CPTP 

4-51 

IFMI 

normal 

CP.PP 

4-62 

XREF 

anywhere 

CPTP 

4-78 

IFNE 

normal 

CPTP 

4-60 

XTEXT 

normal 

CPTP 

5-2 

IFPL 

normal 

CPTP 

4-62 

(blank) 

normal 

CPTP 

4-46 

IFPP 

normal 

CP.PP 

4-58 

= 

normal 

CPTP 

4-39 





Legend 








CP 

Absolute or relocatable CPU 

program 





CPA 

Absolute CPU program 






CPR 

Relocatable CPU program 


' Looked for during IF skipping. 



PP 

Absolute PPU program 
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